b from scale-rotated-ellipse

Time bar (total: 1.1min)

analyze2.4s (3.6%)

Algorithm
search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
0%0%99.8%0.2%0%0%0%0
0%0%99.8%0.2%0%0%0%1
0%0%99.8%0.2%0%0%0%2
0%0%99.8%0.2%0%0%0%3
0%0%99.8%0.2%0%0%0%4
0%0%99.8%0.2%0%0%0%5
0%0%99.8%0.2%0%0%0%6
0%0%99.8%0.2%0%0%0%7
0%0%99.8%0.2%0%0%0%8
0%0%99.8%0.2%0%0%0%9
0%0%99.8%0.2%0%0%0%10
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.6s
ival-mult: 587.0ms (36.9% of total)
ival-pow: 447.0ms (28.1% of total)
ival-div: 209.0ms (13.1% of total)
ival-add: 78.0ms (4.9% of total)
ival-sub: 65.0ms (4.1% of total)
ival-sqrt: 53.0ms (3.3% of total)
ival-pi: 41.0ms (2.6% of total)
ival-neg: 40.0ms (2.5% of total)
ival-sin: 33.0ms (2.1% of total)
ival-cos: 28.0ms (1.8% of total)
const: 8.0ms (0.5% of total)
backward-pass: 2.0ms (0.1% of total)

sample28.9s (43.5%)

Results
13.5s3966×3valid
7.1s1285×4valid
4.7s2105×2valid
1.2s860×1valid
19.0ms40×0valid
Precisions
Click to see histograms. Total time spent on operations: 24.7s
ival-sin: 6.3s (25.5% of total)
ival-cos: 4.6s (18.6% of total)
ival-pow: 3.7s (15% of total)
ival-mult: 3.6s (14.5% of total)
ival-div: 2.4s (9.5% of total)
backward-pass: 1.5s (6% of total)
ival-add: 843.0ms (3.4% of total)
ival-sub: 813.0ms (3.3% of total)
ival-sqrt: 562.0ms (2.3% of total)
ival-neg: 275.0ms (1.1% of total)
ival-pi: 145.0ms (0.6% of total)
const: 60.0ms (0.2% of total)
Bogosity

preprocess373.0ms (0.6%)

Algorithm
egg-herbie
Rules
9426×*-lowering-*.f32
9426×*-lowering-*.f64
2238×neg-lowering-neg.f64
2238×neg-lowering-neg.f32
1748×/-lowering-/.f32
Iterations

Useful iterations: 3 (0.0ms)

IterNodesCost
05563888
115393630
271193630
056183
1134174
2550174
35133171
09422171
Stop Event
iter limit
node limit
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 a (*.f64 b (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale (*.f64 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 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 #s(literal 2 binary64) y-scale)) (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) 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)))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b 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 (* (* (* b (* a (* b (neg a)))) (* 8 (* (* b a) (/ (* b (neg a)) (pow (* x-scale y-scale) 2))))) (- (+ (/ (+ (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))) (hypot (- (/ (+ (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))) (* (* (sin (* angle (/ (PI) 180))) (* 2 (fnmadd a a (* b b)))) (/ (cos (* angle (/ (PI) 180))) (* x-scale y-scale))))))) (* -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)))
(/ (sqrt (* (* (* b (* a (* b (neg a)))) (* 8 (* (* b a) (/ (* b (neg a)) (pow (* x-scale y-scale) 2))))) (- (+ (/ (+ (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))) (hypot (- (/ (+ (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))) (* (* (sin (* angle (/ (PI) 180))) (* 2 (fnmadd a a (* b b)))) (/ (cos (* angle (/ (PI) 180))) (* x-scale y-scale))))))) (* -4 (* (* b a) (/ (* b (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)))
(/ (sqrt (* (* (* b (* a (* b (neg a)))) (* 8 (* (* b a) (/ (* b (neg a)) (pow (* x-scale y-scale) 2))))) (- (+ (/ (+ (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))) (hypot (- (/ (+ (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))) (* (* (sin (* angle (/ (PI) 180))) (* 2 (fnmadd a a (* b b)))) (/ (cos (* angle (/ (PI) 180))) (* x-scale y-scale))))))) (* -4 (* (* b a) (/ (* b (neg a)) (pow (* x-scale y-scale) 2)))))
(/ (neg (sqrt (* (* (* 2 (/ (* 4 (* (* b a) (* b (neg a)))) (pow (* x-scale y-scale) 2))) (* (* b a) (* b (neg a)))) (- (+ (/ (/ (+ (pow (* a (sin (* (/ (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 (* (* (* b (* a (* b (neg a)))) (* 8 (* (* b a) (/ (* b (neg a)) (pow (* x-scale y-scale) 2))))) (- (+ (/ (+ (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))) (hypot (- (/ (+ (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))) (/ (* (sin (* (PI) (/ angle -180))) (* (* 2 (fnmadd a a (* b b))) (cos (* angle (/ (PI) 180))))) (* x-scale y-scale)))))) (* -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)))
(/ (sqrt (* (* (* b (* a (* b (neg a)))) (* 8 (* (* b a) (/ (* b (neg a)) (pow (* x-scale y-scale) 2))))) (- (+ (/ (+ (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))) (hypot (- (/ (+ (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))) (* (* (sin (* angle (/ (PI) 180))) (* 2 (fnmadd a a (* b b)))) (/ (cos (* angle (/ (PI) 180))) (* x-scale y-scale))))))) (* -4 (* (* b a) (/ (* b (neg a)) (pow (* 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)))
(/ (sqrt (* (* (* b (* a (* b (neg a)))) (* 8 (* (* b a) (/ (* b (neg a)) (pow (* x-scale y-scale) 2))))) (- (+ (/ (+ (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))) (hypot (- (/ (+ (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))) (* (* (sin (* angle (/ (PI) 180))) (* 2 (fnmadd a a (* b b)))) (/ (cos (* angle (/ (PI) 180))) (* x-scale y-scale))))))) (* -4 (* (* b a) (/ (* b (neg a)) (pow (* x-scale 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))))
(/ (sqrt (* (* (* b (* a (* b (neg a)))) (* 8 (* (* b a) (/ (* b (neg a)) (pow (* x-scale y-scale) 2))))) (- (+ (/ (+ (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))) (hypot (- (/ (+ (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))) (* (* (sin (* angle (/ (PI) 180))) (* 2 (fnmadd a a (* b b)))) (/ (cos (* angle (/ (PI) 180))) (* x-scale y-scale))))))) (* 4 (* (* b a) (/ (* b (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))))
(/ (sqrt (* (* (* b (* a (* b (neg a)))) (* 8 (* (* b a) (/ (* b (neg a)) (pow (* x-scale y-scale) 2))))) (- (+ (/ (+ (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))) (hypot (- (/ (+ (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))) (* (* (sin (* angle (/ (PI) 180))) (* 2 (fnmadd a a (* b b)))) (/ (cos (* angle (/ (PI) 180))) (* x-scale y-scale))))))) (* 4 (* (* b a) (/ (* 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))))
(/ (sqrt (* (* (* b (* a (* b (neg a)))) (* 8 (* (* b a) (/ (* b (neg a)) (pow (* x-scale y-scale) 2))))) (- (+ (/ (+ (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))) (hypot (- (/ (+ (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))) (/ (* (sin (* (PI) (/ angle -180))) (* (* 2 (fnmadd a a (* b b))) (cos (* angle (/ (PI) 180))))) (* x-scale y-scale)))))) (* 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))))
(/ (sqrt (* (* (* b (* a (* b (neg a)))) (* 8 (* (* b a) (/ (* b (neg a)) (pow (* x-scale y-scale) 2))))) (- (+ (/ (+ (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))) (hypot (- (/ (+ (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))) (* (* (sin (* angle (/ (PI) 180))) (* 2 (fnmadd a a (* b b)))) (/ (cos (* angle (/ (PI) 180))) (* x-scale y-scale))))))) (* 4 (* (* b a) (/ (* b (neg a)) (pow (* 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))))
(/ (sqrt (* (* (* b (* a (* b (neg a)))) (* 8 (* (* b a) (/ (* b (neg a)) (pow (* x-scale y-scale) 2))))) (- (+ (/ (+ (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))) (hypot (- (/ (+ (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))) (* (* (sin (* angle (/ (PI) 180))) (* 2 (fnmadd a a (* b b)))) (/ (cos (* angle (/ (PI) 180))) (* x-scale y-scale))))))) (* 4 (* (* b a) (/ (* b (neg a)) (pow (* x-scale 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)))
(/ (sqrt (* (* (* b (* a (* b (neg a)))) (* 8 (* (* b a) (/ (* b (neg a)) (pow (* x-scale y-scale) 2))))) (- (+ (/ (+ (pow (* a (sin (* angle (/ (PI) 180)))) 2) (pow (* b (cos (* angle (/ (PI) 180)))) 2)) (* y-scale y-scale)) (/ (+ (pow (* a (cos (* angle (/ (PI) 180)))) 2) (pow (* b (sin (* angle (/ (PI) 180)))) 2)) (* x-scale x-scale))) (hypot (- (/ (+ (pow (* a (cos (* angle (/ (PI) 180)))) 2) (pow (* b (sin (* angle (/ (PI) 180)))) 2)) (* x-scale x-scale)) (/ (+ (pow (* a (sin (* angle (/ (PI) 180)))) 2) (pow (* b (cos (* angle (/ (PI) 180)))) 2)) (* y-scale y-scale))) (* (* 2 (* (sin (* angle (/ (PI) 180))) (fmsub a a (* b b)))) (/ (cos (* angle (/ (PI) 180))) (* x-scale y-scale))))))) (* -4 (* (* b a) (/ (* b (neg a)) (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)))
(* -1/4 (/ (sqrt (* (/ (* (* (neg angle) (* angle (* b b))) (* 8 (* (neg angle) (* angle (* b b))))) (pow (* x-scale y-scale) 2)) (- (+ (/ (+ (pow (* angle (sin (* a (/ (PI) 180)))) 2) (pow (* b (cos (* a (/ (PI) 180)))) 2)) (* x-scale x-scale)) (/ (+ (pow (* angle (cos (* a (/ (PI) 180)))) 2) (pow (* b (sin (* a (/ (PI) 180)))) 2)) (* y-scale y-scale))) (hypot (- (/ (+ (pow (* angle (sin (* a (/ (PI) 180)))) 2) (pow (* b (cos (* a (/ (PI) 180)))) 2)) (* x-scale x-scale)) (/ (+ (pow (* angle (cos (* a (/ (PI) 180)))) 2) (pow (* b (sin (* a (/ (PI) 180)))) 2)) (* y-scale y-scale))) (* (cos (* a (/ (PI) 180))) (/ (* (sin (* a (/ (PI) 180))) (* 2 (fmsub b b (* angle angle)))) (* x-scale y-scale))))))) (* (* 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)))
(* -1/4 (/ (sqrt (* (* (neg (pow (* b x-scale) 2)) (* 8 (/ (neg (pow (* b x-scale) 2)) (pow (* a y-scale) 2)))) (- (+ (/ (+ (pow (* b (cos (* angle (/ (PI) 180)))) 2) (pow (* x-scale (sin (* angle (/ (PI) 180)))) 2)) (* a a)) (/ (+ (pow (* b (sin (* angle (/ (PI) 180)))) 2) (pow (* x-scale (cos (* angle (/ (PI) 180)))) 2)) (* y-scale y-scale))) (hypot (- (/ (+ (pow (* b (cos (* angle (/ (PI) 180)))) 2) (pow (* x-scale (sin (* angle (/ (PI) 180)))) 2)) (* a a)) (/ (+ (pow (* b (sin (* angle (/ (PI) 180)))) 2) (pow (* x-scale (cos (* angle (/ (PI) 180)))) 2)) (* y-scale y-scale))) (* (* 2 (* (sin (* angle (/ (PI) 180))) (fmsub b b (* x-scale x-scale)))) (/ (cos (* angle (/ (PI) 180))) (* a y-scale))))))) (/ (neg (pow (* b x-scale) 2)) (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)))
(* -1/4 (/ (sqrt (* (* (neg (pow (* b y-scale) 2)) (/ (* 8 (neg (pow (* b y-scale) 2))) (pow (* a x-scale) 2))) (- (+ (/ (+ (pow (* b (cos (* angle (/ (PI) 180)))) 2) (pow (* y-scale (sin (* angle (/ (PI) 180)))) 2)) (* x-scale x-scale)) (/ (+ (pow (* b (sin (* angle (/ (PI) 180)))) 2) (pow (* y-scale (cos (* angle (/ (PI) 180)))) 2)) (* a a))) (hypot (- (/ (+ (pow (* b (cos (* angle (/ (PI) 180)))) 2) (pow (* y-scale (sin (* angle (/ (PI) 180)))) 2)) (* x-scale x-scale)) (/ (+ (pow (* b (sin (* angle (/ (PI) 180)))) 2) (pow (* y-scale (cos (* angle (/ (PI) 180)))) 2)) (* a a))) (* (* (sin (* angle (/ (PI) 180))) (* 2 (fmsub b b (* y-scale y-scale)))) (/ (cos (* angle (/ (PI) 180))) (* a x-scale))))))) (/ (neg (pow (* b y-scale) 2)) (pow (* a x-scale) 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)))
(* -1/4 (/ (sqrt (* (* (* a (* angle (* a (neg angle)))) (* 8 (* angle (/ (* a (* a (neg angle))) (pow (* x-scale y-scale) 2))))) (+ (/ (+ (pow (* a (sin (* b (/ (PI) 180)))) 2) (pow (* angle (cos (* b (/ (PI) 180)))) 2)) (* x-scale x-scale)) (- (/ (+ (pow (* a (cos (* b (/ (PI) 180)))) 2) (pow (* angle (sin (* b (/ (PI) 180)))) 2)) (* y-scale y-scale)) (hypot (- (/ (+ (pow (* a (sin (* b (/ (PI) 180)))) 2) (pow (* angle (cos (* b (/ (PI) 180)))) 2)) (* x-scale x-scale)) (/ (+ (pow (* a (cos (* b (/ (PI) 180)))) 2) (pow (* angle (sin (* b (/ (PI) 180)))) 2)) (* y-scale y-scale))) (* (* 2 (fmsub angle angle (* a a))) (/ (* (sin (* b (/ (PI) 180))) (cos (* b (/ (PI) 180)))) (* x-scale y-scale)))))))) (* angle (/ (* a (* a (neg angle))) (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)))
(* -1/4 (/ (sqrt (* (* (neg (pow (* a x-scale) 2)) (* 8 (/ (neg (pow (* a x-scale) 2)) (pow (* b y-scale) 2)))) (- (+ (/ (+ (pow (* a (sin (* angle (/ (PI) 180)))) 2) (pow (* x-scale (cos (* angle (/ (PI) 180)))) 2)) (* b b)) (/ (+ (pow (* a (cos (* angle (/ (PI) 180)))) 2) (pow (* x-scale (sin (* angle (/ (PI) 180)))) 2)) (* y-scale y-scale))) (hypot (- (/ (+ (pow (* a (sin (* angle (/ (PI) 180)))) 2) (pow (* x-scale (cos (* angle (/ (PI) 180)))) 2)) (* b b)) (/ (+ (pow (* a (cos (* angle (/ (PI) 180)))) 2) (pow (* x-scale (sin (* angle (/ (PI) 180)))) 2)) (* y-scale y-scale))) (* (* (sin (* angle (/ (PI) 180))) (* 2 (fmsub x-scale x-scale (* a a)))) (/ (cos (* angle (/ (PI) 180))) (* b y-scale))))))) (/ (neg (pow (* a x-scale) 2)) (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)))
(* -1/4 (/ (sqrt (* (* (neg (pow (* a y-scale) 2)) (* 8 (/ (neg (pow (* a y-scale) 2)) (pow (* b x-scale) 2)))) (+ (/ (+ (pow (* a (cos (* angle (/ (PI) 180)))) 2) (pow (* y-scale (sin (* angle (/ (PI) 180)))) 2)) (* b b)) (- (/ (+ (pow (* a (sin (* angle (/ (PI) 180)))) 2) (pow (* y-scale (cos (* angle (/ (PI) 180)))) 2)) (* x-scale x-scale)) (hypot (- (/ (+ (pow (* a (sin (* angle (/ (PI) 180)))) 2) (pow (* y-scale (cos (* angle (/ (PI) 180)))) 2)) (* x-scale x-scale)) (/ (+ (pow (* a (cos (* angle (/ (PI) 180)))) 2) (pow (* y-scale (sin (* angle (/ (PI) 180)))) 2)) (* b b))) (* (cos (* angle (/ (PI) 180))) (/ (* (sin (* angle (/ (PI) 180))) (* 2 (fmsub y-scale y-scale (* a a)))) (* b x-scale)))))))) (/ (neg (pow (* a y-scale) 2)) (pow (* b x-scale) 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)))
(* -1/4 (/ (sqrt (* (* (* b (* a (* b (neg a)))) (* 8 (* b (/ (* a (* b (neg a))) (pow (* y-scale angle) 2))))) (+ (/ (+ (pow (* a (cos (* x-scale (/ (PI) 180)))) 2) (pow (* b (sin (* x-scale (/ (PI) 180)))) 2)) (* y-scale y-scale)) (- (/ (+ (pow (* a (sin (* x-scale (/ (PI) 180)))) 2) (pow (* b (cos (* x-scale (/ (PI) 180)))) 2)) (* angle angle)) (hypot (- (/ (+ (pow (* a (sin (* x-scale (/ (PI) 180)))) 2) (pow (* b (cos (* x-scale (/ (PI) 180)))) 2)) (* angle angle)) (/ (+ (pow (* a (cos (* x-scale (/ (PI) 180)))) 2) (pow (* b (sin (* x-scale (/ (PI) 180)))) 2)) (* y-scale y-scale))) (* (* (* 2 (fnmadd a a (* b b))) (sin (* x-scale (/ (PI) 180)))) (/ (cos (* x-scale (/ (PI) 180))) (* y-scale angle)))))))) (* b (/ (* a (* b (neg a))) (pow (* y-scale angle) 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)))
(* -1/4 (/ (sqrt (* (* (* b (neg a)) (/ (* (* 8 (* b (* a (* b (neg a))))) (* b a)) (pow (* x-scale angle) 2))) (- (+ (/ (+ (pow (* a (sin (* y-scale (/ (PI) 180)))) 2) (pow (* b (cos (* y-scale (/ (PI) 180)))) 2)) (* x-scale x-scale)) (/ (+ (pow (* a (cos (* y-scale (/ (PI) 180)))) 2) (pow (* b (sin (* y-scale (/ (PI) 180)))) 2)) (* angle angle))) (hypot (- (/ (+ (pow (* a (sin (* y-scale (/ (PI) 180)))) 2) (pow (* b (cos (* y-scale (/ (PI) 180)))) 2)) (* x-scale x-scale)) (/ (+ (pow (* a (cos (* y-scale (/ (PI) 180)))) 2) (pow (* b (sin (* y-scale (/ (PI) 180)))) 2)) (* angle angle))) (* (* (* 2 (fnmadd a a (* b b))) (sin (* y-scale (/ (PI) 180)))) (/ (cos (* y-scale (/ (PI) 180))) (* x-scale angle))))))) (* 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)))
(/ (sqrt (* (* (* b (* a (* b (neg a)))) (* 8 (* (* b a) (/ (* b (neg a)) (pow (* x-scale y-scale) 2))))) (- (+ (/ (+ (pow (* a (sin (* angle (/ (PI) 180)))) 2) (pow (* b (cos (* angle (/ (PI) 180)))) 2)) (* y-scale y-scale)) (/ (+ (pow (* a (cos (* angle (/ (PI) 180)))) 2) (pow (* b (sin (* angle (/ (PI) 180)))) 2)) (* x-scale x-scale))) (hypot (* (* (sin (* angle (/ (PI) 180))) (* 2 (fnmadd a a (* b b)))) (/ (cos (* angle (/ (PI) 180))) (* x-scale y-scale))) (- (/ (+ (pow (* a (sin (* angle (/ (PI) 180)))) 2) (pow (* b (cos (* angle (/ (PI) 180)))) 2)) (* y-scale y-scale)) (/ (+ (pow (* a (cos (* angle (/ (PI) 180)))) 2) (pow (* b (sin (* angle (/ (PI) 180)))) 2)) (* x-scale x-scale))))))) (* -4 (* (* b a) (/ (* b (neg a)) (pow (* x-scale y-scale) 2)))))
Symmetry

(abs a)

(abs b)

(abs x-scale)

(abs y-scale)

explain2.3s (3.4%)

FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
1870-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)))))
1670-1(1.4835181535589995e+87 3.0963817156019804e-148 -1.3766460733931596e+268 6.858998484715028e-208 5.692295786291724e+245)(/.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))))
1260-2(2.9033431128217985e+195 1.0869543684809512e-281 -2140.2868494091135 4.230834442704589e+215 1.159609326045791e-305)(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
1240-0-(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
680-2(1.1368095215088049e-306 8.330458657041507e+266 2.1258607117105073e-90 2.570491059546671e-80 6.820824752481548e-77)(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))
530-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))
440-2(1.2073000901305413e+88 3.8964417735332695e-194 7.8288677722505525e+208 6.183436092921252e-58 1.7715555920241473e-128)(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)))))))
430-0-(sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.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))))
350-3(1.4425009968571191e+183 5.709058401280276e-195 -6.2991010107492735e-111 4.6810230384076015e-201 4.29200348233864e+73)(*.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))))))
310-0-(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)
310-3(9.131506977352563e-118 1.9782269016238276e-14 -2.1694369724183026e-23 4.98320955742811e+266 1.5114479206945294e-179)(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)
290-0-(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)
290-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))))
220-0-(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)
140-0-(*.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))))
110-0-(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))
90-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)
90-0-(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)
00-0-(*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a))))
00-0-y-scale
00-0-#s(literal 4 binary64)
028(8.319348386515605e+203 1.6511398572428062e-264 1.1648911321615987e+88 1.0231885774333841e-22 1.7619128051227852e+304)0-(pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))
00-0-(/.f64 angle #s(literal 180 binary64))
00-0-(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))
00-0-(PI.f64)
088(2.0716185391115516e+77 1.6045197208319936e-193 -2.1534911871359797e+90 4.6303561639746824e+101 3.0602052353890595e-248)0-(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
00-0-(pow.f64 a #s(literal 2 binary64))
098(1.5364790287583664e-173 6.7467386184429874e+100 2.3617537258096608e+23 1.84941877602895e-188 1.130817383032949e-206)0-(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
00-0-(*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))))
00-0-(+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64)))
00-0-a
00-0-b
00-0-(*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
019(2.4457566439972046e+176 0.017495584626304423 -3.669565679645881e+94 5.1517510471747296e+237 1.7643623888080283e+282)0-(pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64))
00-0-#s(literal 2 binary64)
00-0-angle
00-0-#s(literal 180 binary64)
00-0-(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
00-0-(+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))
00-0-(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
00-0-(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))
00-0-(neg.f64 a)
00-0-(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))
00-0-(*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
00-0-(pow.f64 b #s(literal 2 binary64))
00-0-(*.f64 b (neg.f64 a))
098(2.0716185391115516e+77 1.6045197208319936e-193 -2.1534911871359797e+90 4.6303561639746824e+101 3.0602052353890595e-248)0-(pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))
00-0-(*.f64 x-scale y-scale)
00-0-(*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))
00-0-(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
00-0-(neg.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64)))) (*.f64 (*.f64 b a) (*.f64 b (neg.f64 a)))) (-.f64 (+.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) (sqrt.f64 (+.f64 (pow.f64 (-.f64 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(literal 2 binary64))))))))
00-0-(*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
055(2.6002200274136967e+133 2.761442532840765e+135 1.0602676524235508e+186 1.242375941974943e-176 3.3909303002960747e-239)0-(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
053(2.6002200274136967e+133 2.761442532840765e+135 1.0602676524235508e+186 1.242375941974943e-176 3.3909303002960747e-239)0-(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
00-0-(*.f64 b a)
00-0-x-scale
Results
869.0ms246×3valid
493.0ms80×4valid
295.0ms120×2valid
95.0ms66×1valid
Compiler

Compiled 3426 to 170 computations (95% saved)

Precisions
Click to see histograms. Total time spent on operations: 1.4s
ival-sin: 335.0ms (24.1% of total)
ival-cos: 282.0ms (20.2% of total)
ival-pow: 213.0ms (15.3% of total)
ival-mult: 192.0ms (13.8% of total)
ival-div: 125.0ms (9% of total)
backward-pass: 122.0ms (8.8% of total)
ival-add: 36.0ms (2.6% of total)
ival-sqrt: 31.0ms (2.2% of total)
ival-sub: 30.0ms (2.2% of total)
ival-neg: 14.0ms (1% of total)
ival-pi: 9.0ms (0.6% of total)
const: 4.0ms (0.3% of total)

eval1.0ms (0%)

Compiler

Compiled 181 to 55 computations (69.6% saved)

prune1.0ms (0%)

Alt Table
Click to see full alt table
StatusAccuracyProgram
0.1%
(/.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 b a) (*.f64 (*.f64 (*.f64 b a) #s(literal 8 binary64)) (/.f64 (*.f64 a (*.f64 b (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale (*.f64 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 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 #s(literal 2 binary64) y-scale)) (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) 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)))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
Compiler

Compiled 181 to 55 computations (69.6% saved)

simplify227.0ms (0.3%)

Algorithm
egg-herbie
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
cost-diff0
(*.f64 (*.f64 b a) (*.f64 (*.f64 (*.f64 b a) #s(literal 8 binary64)) (/.f64 (*.f64 a (*.f64 b (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
cost-diff0
(*.f64 (*.f64 (*.f64 b a) (*.f64 (*.f64 (*.f64 b a) #s(literal 8 binary64)) (/.f64 (*.f64 a (*.f64 b (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale (*.f64 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 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 #s(literal 2 binary64) y-scale)) (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) 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)))))
cost-diff0
(sqrt.f64 (*.f64 (*.f64 (*.f64 b a) (*.f64 (*.f64 (*.f64 b a) #s(literal 8 binary64)) (/.f64 (*.f64 a (*.f64 b (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale (*.f64 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 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 #s(literal 2 binary64) y-scale)) (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) 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))))))
cost-diff0
(/.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 b a) (*.f64 (*.f64 (*.f64 b a) #s(literal 8 binary64)) (/.f64 (*.f64 a (*.f64 b (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale (*.f64 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 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 #s(literal 2 binary64) y-scale)) (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) 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)))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
Rules
4920×*-lowering-*.f32
4920×*-lowering-*.f64
2770×/-lowering-/.f32
2770×/-lowering-/.f64
1378×times-frac
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
0581247
11591247
27291217
343151217
463301217
080251217
Stop Event
iter limit
node limit
Calls
Call 1
Inputs
(/ (sqrt (* (* (* b a) (* (* (* b a) 8) (/ (* a (* b (* b a))) (* x-scale (* y-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)))) (* (* (* (- (* b b) (* a a)) (/ 2 y-scale)) (* (sin (/ (* angle (PI)) 180)) (/ (cos (/ (* angle (PI)) 180)) x-scale))) (* (* (- (* b b) (* a a)) (/ 2 y-scale)) (* (sin (/ (* angle (PI)) 180)) (/ (cos (/ (* angle (PI)) 180)) x-scale)))))) (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)))))) (/ (* 4 (* a (* b (* b a)))) (* x-scale (* y-scale (* x-scale y-scale)))))
(sqrt (* (* (* b a) (* (* (* b a) 8) (/ (* a (* b (* b a))) (* x-scale (* y-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)))) (* (* (* (- (* b b) (* a a)) (/ 2 y-scale)) (* (sin (/ (* angle (PI)) 180)) (/ (cos (/ (* angle (PI)) 180)) x-scale))) (* (* (- (* b b) (* a a)) (/ 2 y-scale)) (* (sin (/ (* angle (PI)) 180)) (/ (cos (/ (* angle (PI)) 180)) x-scale)))))) (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale))))))
(* (* (* b a) (* (* (* b a) 8) (/ (* a (* b (* b a))) (* x-scale (* y-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)))) (* (* (* (- (* b b) (* a a)) (/ 2 y-scale)) (* (sin (/ (* angle (PI)) 180)) (/ (cos (/ (* angle (PI)) 180)) x-scale))) (* (* (- (* b b) (* a a)) (/ 2 y-scale)) (* (sin (/ (* angle (PI)) 180)) (/ (cos (/ (* angle (PI)) 180)) x-scale)))))) (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)))))
(* (* b a) (* (* (* b a) 8) (/ (* a (* b (* b a))) (* x-scale (* y-scale (* x-scale y-scale))))))
(* b a)
b
a
(* (* (* b a) 8) (/ (* a (* b (* b a))) (* x-scale (* y-scale (* x-scale y-scale)))))
(* (* b a) 8)
8
(/ (* a (* b (* b a))) (* x-scale (* y-scale (* x-scale y-scale))))
(* a (* b (* b a)))
(* b (* b a))
(* x-scale (* y-scale (* x-scale y-scale)))
x-scale
(* y-scale (* x-scale y-scale))
y-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)))) (* (* (* (- (* b b) (* a a)) (/ 2 y-scale)) (* (sin (/ (* angle (PI)) 180)) (/ (cos (/ (* angle (PI)) 180)) x-scale))) (* (* (- (* b b) (* a a)) (/ 2 y-scale)) (* (sin (/ (* angle (PI)) 180)) (/ (cos (/ (* angle (PI)) 180)) x-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)))) (* (* (* (- (* b b) (* a a)) (/ 2 y-scale)) (* (sin (/ (* angle (PI)) 180)) (/ (cos (/ (* angle (PI)) 180)) x-scale))) (* (* (- (* b b) (* a a)) (/ 2 y-scale)) (* (sin (/ (* angle (PI)) 180)) (/ (cos (/ (* angle (PI)) 180)) x-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)))) (* (* (* (- (* b b) (* a a)) (/ 2 y-scale)) (* (sin (/ (* angle (PI)) 180)) (/ (cos (/ (* angle (PI)) 180)) x-scale))) (* (* (- (* b b) (* a a)) (/ 2 y-scale)) (* (sin (/ (* angle (PI)) 180)) (/ (cos (/ (* angle (PI)) 180)) x-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)
(* (* (- (* b b) (* a a)) (/ 2 y-scale)) (* (sin (/ (* angle (PI)) 180)) (/ (cos (/ (* angle (PI)) 180)) x-scale)))
(* (- (* b b) (* a a)) (/ 2 y-scale))
(- (* b b) (* a a))
(* b b)
(* a a)
(/ 2 y-scale)
(* (sin (/ (* angle (PI)) 180)) (/ (cos (/ (* angle (PI)) 180)) x-scale))
(/ (cos (/ (* angle (PI)) 180)) x-scale)
(/ (* 4 (* a (* b (* b a)))) (* x-scale (* y-scale (* x-scale y-scale))))
(* 4 (* a (* b (* b a))))
4
Outputs
(/ (sqrt (* (* (* b a) (* (* (* b a) 8) (/ (* a (* b (* b a))) (* x-scale (* y-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)))) (* (* (* (- (* b b) (* a a)) (/ 2 y-scale)) (* (sin (/ (* angle (PI)) 180)) (/ (cos (/ (* angle (PI)) 180)) x-scale))) (* (* (- (* b b) (* a a)) (/ 2 y-scale)) (* (sin (/ (* angle (PI)) 180)) (/ (cos (/ (* angle (PI)) 180)) x-scale)))))) (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)))))) (/ (* 4 (* a (* b (* b a)))) (* x-scale (* y-scale (* x-scale y-scale)))))
(/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 (*.f64 b a) (*.f64 b (*.f64 a (*.f64 (*.f64 b a) #s(literal 8 binary64)))))) (*.f64 y-scale (*.f64 x-scale (*.f64 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 (/.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)) (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 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (*.f64 (+.f64 b a) (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 b a)) y-scale)))) x-scale)))))) (/.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 b a))) #s(literal 4 binary64)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(sqrt (* (* (* b a) (* (* (* b a) 8) (/ (* a (* b (* b a))) (* x-scale (* y-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)))) (* (* (* (- (* b b) (* a a)) (/ 2 y-scale)) (* (sin (/ (* angle (PI)) 180)) (/ (cos (/ (* angle (PI)) 180)) x-scale))) (* (* (- (* b b) (* a a)) (/ 2 y-scale)) (* (sin (/ (* angle (PI)) 180)) (/ (cos (/ (* angle (PI)) 180)) x-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 b a) (*.f64 (*.f64 b a) (*.f64 b (*.f64 a (*.f64 (*.f64 b a) #s(literal 8 binary64)))))) (*.f64 y-scale (*.f64 x-scale (*.f64 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 (/.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)) (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 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (*.f64 (+.f64 b a) (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 b a)) y-scale)))) x-scale))))))
(* (* (* b a) (* (* (* b a) 8) (/ (* a (* b (* b a))) (* x-scale (* y-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)))) (* (* (* (- (* b b) (* a a)) (/ 2 y-scale)) (* (sin (/ (* angle (PI)) 180)) (/ (cos (/ (* angle (PI)) 180)) x-scale))) (* (* (- (* b b) (* a a)) (/ 2 y-scale)) (* (sin (/ (* angle (PI)) 180)) (/ (cos (/ (* angle (PI)) 180)) x-scale)))))) (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)))))
(*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 (*.f64 b a) (*.f64 b (*.f64 a (*.f64 (*.f64 b a) #s(literal 8 binary64)))))) (*.f64 y-scale (*.f64 x-scale (*.f64 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 (/.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)) (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 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (*.f64 (+.f64 b a) (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 b a)) y-scale)))) x-scale)))))
(* (* b a) (* (* (* b a) 8) (/ (* a (* b (* b a))) (* x-scale (* y-scale (* x-scale y-scale))))))
(/.f64 (*.f64 (*.f64 b a) (*.f64 (*.f64 b a) (*.f64 b (*.f64 a (*.f64 (*.f64 b a) #s(literal 8 binary64)))))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(* b a)
(*.f64 b a)
b
a
(* (* (* b a) 8) (/ (* a (* b (* b a))) (* x-scale (* y-scale (* x-scale y-scale)))))
(*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b a) #s(literal 8 binary64)) x-scale))
(* (* b a) 8)
(*.f64 (*.f64 b a) #s(literal 8 binary64))
8
#s(literal 8 binary64)
(/ (* a (* b (* b a))) (* x-scale (* y-scale (* x-scale y-scale))))
(/.f64 (*.f64 b (*.f64 a (*.f64 b a))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(* a (* b (* b a)))
(*.f64 b (*.f64 a (*.f64 b a)))
(* b (* b a))
(*.f64 b (*.f64 b a))
(* x-scale (* y-scale (* x-scale y-scale)))
(*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))
x-scale
(* y-scale (* x-scale y-scale))
(*.f64 x-scale (*.f64 y-scale y-scale))
y-scale
(* x-scale y-scale)
(*.f64 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)))) (* (* (* (- (* b b) (* a a)) (/ 2 y-scale)) (* (sin (/ (* angle (PI)) 180)) (/ (cos (/ (* angle (PI)) 180)) x-scale))) (* (* (- (* b b) (* a a)) (/ 2 y-scale)) (* (sin (/ (* angle (PI)) 180)) (/ (cos (/ (* angle (PI)) 180)) x-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 (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 (+.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)) (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 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (*.f64 (+.f64 b a) (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 b a)) y-scale)))) x-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)))) (* (* (* (- (* b b) (* a a)) (/ 2 y-scale)) (* (sin (/ (* angle (PI)) 180)) (/ (cos (/ (* angle (PI)) 180)) x-scale))) (* (* (- (* b b) (* a a)) (/ 2 y-scale)) (* (sin (/ (* angle (PI)) 180)) (/ (cos (/ (* angle (PI)) 180)) x-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 (*.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 b a) (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 b a)) y-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)))
(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)))) (* (* (* (- (* b b) (* a a)) (/ 2 y-scale)) (* (sin (/ (* angle (PI)) 180)) (/ (cos (/ (* angle (PI)) 180)) x-scale))) (* (* (- (* b b) (* a a)) (/ 2 y-scale)) (* (sin (/ (* angle (PI)) 180)) (/ (cos (/ (* angle (PI)) 180)) x-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 (*.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 b a) (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 b a)) y-scale)))) x-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)))
(-.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)
(* (* (- (* b b) (* a a)) (/ 2 y-scale)) (* (sin (/ (* angle (PI)) 180)) (/ (cos (/ (* angle (PI)) 180)) x-scale)))
(/.f64 (*.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 b a) (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 b a)) y-scale)))) x-scale)
(* (- (* b b) (* a a)) (/ 2 y-scale))
(*.f64 (+.f64 b a) (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 b a)) y-scale))
(- (* b b) (* a a))
(-.f64 (*.f64 b b) (*.f64 a a))
(* b b)
(*.f64 b b)
(* a a)
(*.f64 a a)
(/ 2 y-scale)
(/.f64 #s(literal 2 binary64) y-scale)
(* (sin (/ (* angle (PI)) 180)) (/ (cos (/ (* angle (PI)) 180)) x-scale))
(/.f64 (*.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) x-scale)
(/ (cos (/ (* angle (PI)) 180)) x-scale)
(/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) x-scale)
(/ (* 4 (* a (* b (* b a)))) (* x-scale (* y-scale (* x-scale y-scale))))
(/.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 b a))) #s(literal 4 binary64)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(* 4 (* a (* b (* b a))))
(*.f64 (*.f64 b (*.f64 a (*.f64 b a))) #s(literal 4 binary64))
4
#s(literal 4 binary64)

localize2.6s (3.9%)

Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
accuracy100.0%
(sqrt.f64 (*.f64 (*.f64 (*.f64 b a) (*.f64 (*.f64 (*.f64 b a) #s(literal 8 binary64)) (/.f64 (*.f64 a (*.f64 b (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale (*.f64 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 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 #s(literal 2 binary64) y-scale)) (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) 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))))))
accuracy100.0%
(sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))
accuracy100.0%
(cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))
accuracy3.1%
(PI.f64)
Results
2.4s256×5exit
Compiler

Compiled 1262 to 56 computations (95.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 2.1s
ival-sin: 944.0ms (45.1% of total)
ival-cos: 404.0ms (19.3% of total)
ival-mult: 287.0ms (13.7% of total)
ival-div: 130.0ms (6.2% of total)
backward-pass: 117.0ms (5.6% of total)
ival-pow: 83.0ms (4% of total)
compiled-spec: 35.0ms (1.7% of total)
ival-sub: 32.0ms (1.5% of total)
ival-sqrt: 28.0ms (1.3% of total)
ival-add: 21.0ms (1% of total)
ival-pi: 9.0ms (0.4% of total)
const: 3.0ms (0.1% of total)

series490.0ms (0.7%)

Counts
7 → 252
Calls
Call 1
Inputs
#<alt (/ (sqrt (* (* (* b a) (* (* (* b a) 8) (/ (* a (* b (* b a))) (* x-scale (* y-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)))) (* (* (* (- (* b b) (* a a)) (/ 2 y-scale)) (* (sin (/ (* angle (PI)) 180)) (/ (cos (/ (* angle (PI)) 180)) x-scale))) (* (* (- (* b b) (* a a)) (/ 2 y-scale)) (* (sin (/ (* angle (PI)) 180)) (/ (cos (/ (* angle (PI)) 180)) x-scale)))))) (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)))))) (/ (* 4 (* a (* b (* b a)))) (* x-scale (* y-scale (* x-scale y-scale)))))>
#<alt (sqrt (* (* (* b a) (* (* (* b a) 8) (/ (* a (* b (* b a))) (* x-scale (* y-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)))) (* (* (* (- (* b b) (* a a)) (/ 2 y-scale)) (* (sin (/ (* angle (PI)) 180)) (/ (cos (/ (* angle (PI)) 180)) x-scale))) (* (* (- (* b b) (* a a)) (/ 2 y-scale)) (* (sin (/ (* angle (PI)) 180)) (/ (cos (/ (* angle (PI)) 180)) x-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) (/ (* a (* b (* b a))) (* x-scale (* y-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)))) (* (* (* (- (* b b) (* a a)) (/ 2 y-scale)) (* (sin (/ (* angle (PI)) 180)) (/ (cos (/ (* angle (PI)) 180)) x-scale))) (* (* (- (* b b) (* a a)) (/ 2 y-scale)) (* (sin (/ (* angle (PI)) 180)) (/ (cos (/ (* angle (PI)) 180)) x-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) (/ (* a (* b (* b a))) (* x-scale (* y-scale (* 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:

TimeVariablePointExpression
45.0ms
y-scale
@0
(/ (sqrt (* (* (* b a) (* (* (* b a) 8) (/ (* a (* b (* b a))) (* x-scale (* y-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)))) (* (* (* (- (* b b) (* a a)) (/ 2 y-scale)) (* (sin (/ (* angle (PI)) 180)) (/ (cos (/ (* angle (PI)) 180)) x-scale))) (* (* (- (* b b) (* a a)) (/ 2 y-scale)) (* (sin (/ (* angle (PI)) 180)) (/ (cos (/ (* angle (PI)) 180)) x-scale)))))) (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)))))) (/ (* 4 (* a (* b (* b a)))) (* x-scale (* y-scale (* x-scale y-scale)))))
31.0ms
b
@0
(/ (sqrt (* (* (* b a) (* (* (* b a) 8) (/ (* a (* b (* b a))) (* x-scale (* y-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)))) (* (* (* (- (* b b) (* a a)) (/ 2 y-scale)) (* (sin (/ (* angle (PI)) 180)) (/ (cos (/ (* angle (PI)) 180)) x-scale))) (* (* (- (* b b) (* a a)) (/ 2 y-scale)) (* (sin (/ (* angle (PI)) 180)) (/ (cos (/ (* angle (PI)) 180)) x-scale)))))) (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)))))) (/ (* 4 (* a (* b (* b a)))) (* x-scale (* y-scale (* x-scale y-scale)))))
31.0ms
angle
@0
(cos (/ (* angle (PI)) 180))
24.0ms
a
@0
(/ (sqrt (* (* (* b a) (* (* (* b a) 8) (/ (* a (* b (* b a))) (* x-scale (* y-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)))) (* (* (* (- (* b b) (* a a)) (/ 2 y-scale)) (* (sin (/ (* angle (PI)) 180)) (/ (cos (/ (* angle (PI)) 180)) x-scale))) (* (* (- (* b b) (* a a)) (/ 2 y-scale)) (* (sin (/ (* angle (PI)) 180)) (/ (cos (/ (* angle (PI)) 180)) x-scale)))))) (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)))))) (/ (* 4 (* a (* b (* b a)))) (* x-scale (* y-scale (* x-scale y-scale)))))
22.0ms
x-scale
@0
(/ (sqrt (* (* (* b a) (* (* (* b a) 8) (/ (* a (* b (* b a))) (* x-scale (* y-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)))) (* (* (* (- (* b b) (* a a)) (/ 2 y-scale)) (* (sin (/ (* angle (PI)) 180)) (/ (cos (/ (* angle (PI)) 180)) x-scale))) (* (* (- (* b b) (* a a)) (/ 2 y-scale)) (* (sin (/ (* angle (PI)) 180)) (/ (cos (/ (* angle (PI)) 180)) x-scale)))))) (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)))))) (/ (* 4 (* a (* b (* b a)))) (* x-scale (* y-scale (* x-scale y-scale)))))

rewrite451.0ms (0.7%)

Algorithm
batch-egg-rewrite
Rules
5004×*-lowering-*.f32
5004×*-lowering-*.f64
2288×pow-lowering-pow.f64
2288×pow-lowering-pow.f32
2064×fma-lowering-fma.f32
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
058526
1366492
23669468
08499468
Stop Event
iter limit
node limit
Counts
7 → 140
Calls
Call 1
Inputs
(/ (sqrt (* (* (* b a) (* (* (* b a) 8) (/ (* a (* b (* b a))) (* x-scale (* y-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)))) (* (* (* (- (* b b) (* a a)) (/ 2 y-scale)) (* (sin (/ (* angle (PI)) 180)) (/ (cos (/ (* angle (PI)) 180)) x-scale))) (* (* (- (* b b) (* a a)) (/ 2 y-scale)) (* (sin (/ (* angle (PI)) 180)) (/ (cos (/ (* angle (PI)) 180)) x-scale)))))) (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)))))) (/ (* 4 (* a (* b (* b a)))) (* x-scale (* y-scale (* x-scale y-scale)))))
(sqrt (* (* (* b a) (* (* (* b a) 8) (/ (* a (* b (* b a))) (* x-scale (* y-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)))) (* (* (* (- (* b b) (* a a)) (/ 2 y-scale)) (* (sin (/ (* angle (PI)) 180)) (/ (cos (/ (* angle (PI)) 180)) x-scale))) (* (* (- (* b b) (* a a)) (/ 2 y-scale)) (* (sin (/ (* angle (PI)) 180)) (/ (cos (/ (* angle (PI)) 180)) x-scale)))))) (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale))))))
(* (* (* b a) (* (* (* b a) 8) (/ (* a (* b (* b a))) (* x-scale (* y-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)))) (* (* (* (- (* b b) (* a a)) (/ 2 y-scale)) (* (sin (/ (* angle (PI)) 180)) (/ (cos (/ (* angle (PI)) 180)) x-scale))) (* (* (- (* b b) (* a a)) (/ 2 y-scale)) (* (sin (/ (* angle (PI)) 180)) (/ (cos (/ (* angle (PI)) 180)) x-scale)))))) (/ (+ (pow (* a (sin (/ (* angle (PI)) 180))) 2) (pow (* b (cos (/ (* angle (PI)) 180))) 2)) (* x-scale x-scale)))))
(* (* b a) (* (* (* b a) 8) (/ (* a (* b (* b a))) (* x-scale (* y-scale (* x-scale y-scale))))))
(PI)
(cos (/ (* angle (PI)) 180))
(sin (/ (* angle (PI)) 180))
Outputs
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 (/.f64 (*.f64 a #s(literal 4 binary64)) x-scale) (/.f64 (*.f64 b (*.f64 b a)) (*.f64 x-scale (*.f64 y-scale y-scale)))) (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))))))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))))) (/.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 b a))) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale))))))))) (*.f64 (/.f64 (*.f64 a #s(literal 4 binary64)) x-scale) (/.f64 (*.f64 b (*.f64 b a)) (*.f64 x-scale (*.f64 y-scale y-scale))))))
(/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))))) (*.f64 (/.f64 (*.f64 a #s(literal 4 binary64)) x-scale) (/.f64 (*.f64 b (*.f64 b a)) (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (*.f64 a #s(literal 4 binary64)) x-scale) (/.f64 (*.f64 b (*.f64 b a)) (*.f64 x-scale (*.f64 y-scale y-scale)))) (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 a #s(literal 4 binary64)) x-scale) (/.f64 (*.f64 b (*.f64 b a)) (*.f64 x-scale (*.f64 y-scale y-scale)))) (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale))))))))) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale))))))))) (/.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 b a))) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))))) (*.f64 a (*.f64 (*.f64 b (*.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) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 a #s(literal 4 binary64)) x-scale) (/.f64 (*.f64 b (*.f64 b a)) (*.f64 x-scale (*.f64 y-scale y-scale)))) (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))))))) (*.f64 (/.f64 (*.f64 a #s(literal 4 binary64)) x-scale) (/.f64 (*.f64 b (*.f64 b a)) (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))))) #s(literal 1 binary64)) (*.f64 (/.f64 (*.f64 a #s(literal 4 binary64)) x-scale) (/.f64 (*.f64 b (*.f64 b a)) (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 a (*.f64 (*.f64 b (*.f64 b a)) #s(literal 4 binary64))))
(/.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))))) #s(literal 4 binary64)) (/.f64 (*.f64 b (*.f64 a (*.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (*.f64 b (*.f64 a (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale y-scale))))
(pow.f64 (/.f64 (*.f64 (/.f64 (*.f64 a #s(literal 4 binary64)) x-scale) (/.f64 (*.f64 b (*.f64 b a)) (*.f64 x-scale (*.f64 y-scale y-scale)))) (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale))))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 (/.f64 (*.f64 a #s(literal 4 binary64)) x-scale) (/.f64 (*.f64 b (*.f64 b a)) (*.f64 x-scale (*.f64 y-scale y-scale)))) (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale))))))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))))) (*.f64 a (*.f64 (*.f64 b (*.f64 b a)) #s(literal 4 binary64)))))
(*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 (*.f64 b (*.f64 b a)) #s(literal 4 binary64)))))
(*.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))))) (*.f64 (/.f64 (*.f64 a #s(literal 4 binary64)) x-scale) (/.f64 (*.f64 b (*.f64 b a)) (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale))))))))) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 b a))) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 (*.f64 b (*.f64 b a)) #s(literal 4 binary64)))) (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))))))
(*.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 (*.f64 b (*.f64 b a)) #s(literal 4 binary64)))) (pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale))))))))) #s(literal -1 binary64)))
(*.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))))) (*.f64 a (*.f64 (*.f64 b (*.f64 b a)) #s(literal 4 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (sqrt.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a)))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale))))))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 (*.f64 b (*.f64 b a)) #s(literal 4 binary64))))))
(*.f64 (sqrt.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a)))))) (/.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale))))))) (*.f64 (/.f64 (*.f64 a #s(literal 4 binary64)) x-scale) (/.f64 (*.f64 b (*.f64 b a)) (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 (/.f64 (sqrt.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale))))))) (/.f64 (*.f64 b (*.f64 a (*.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 (/.f64 (sqrt.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a)))))) (*.f64 a (*.f64 (*.f64 b (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale))))))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 (sqrt.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a)))))) (/.f64 #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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale))))))) (/.f64 (*.f64 b (*.f64 a (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 a (*.f64 (*.f64 b (*.f64 b a)) #s(literal 4 binary64)))) (pow.f64 (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale))) (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale))))))))) #s(literal -1 binary64)))
(*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale))))))))) #s(literal -1 binary64)))
(*.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))))) (*.f64 a (*.f64 (*.f64 b (*.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 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))))) (*.f64 a (*.f64 (*.f64 b (*.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 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))))) (*.f64 a (*.f64 (*.f64 b (*.f64 b a)) #s(literal 4 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale)
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 4 binary64) x-scale)) (pow.f64 (/.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale y-scale))) (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale))))))))) #s(literal -1 binary64)))
(*.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))))) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 (*.f64 b (*.f64 b a)) #s(literal 4 binary64)))))
(*.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))))) (*.f64 (*.f64 b (*.f64 a (*.f64 b a))) #s(literal -4 binary64))) (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (-.f64 #s(literal 0 binary64) x-scale)))
(*.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))))) (/.f64 (*.f64 a (*.f64 (*.f64 b (*.f64 b a)) #s(literal 4 binary64))) x-scale)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(*.f64 (pow.f64 (/.f64 #s(literal 4 binary64) (sqrt.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a))))))) #s(literal -1 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 b a))) (*.f64 x-scale (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 a (*.f64 (*.f64 b (*.f64 b a)) #s(literal 4 binary64))) (sqrt.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a))))))) #s(literal -1 binary64)) (pow.f64 (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (/.f64 #s(literal 4 binary64) x-scale) (sqrt.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a))))))) #s(literal -1 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 b 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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))))) #s(literal 1/2 binary64)))
(sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale))))))))
(pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale))))))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (*.f64 b a) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a #s(literal 8 binary64))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale))))))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a #s(literal 8 binary64))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale))))))) #s(literal 1/2 binary64)) (pow.f64 (*.f64 b a) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a)))))) (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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale))))))) (sqrt.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a)))))))
(*.f64 (sqrt.f64 (*.f64 b a)) (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a #s(literal 8 binary64))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))))))
(*.f64 (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale))))))) #s(literal 1/4 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale))))))) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 a #s(literal 1/2 binary64)) (pow.f64 (*.f64 b (*.f64 (/.f64 (*.f64 b (*.f64 a #s(literal 8 binary64))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 b #s(literal 1/2 binary64)) (pow.f64 (*.f64 a (*.f64 (/.f64 (*.f64 b (*.f64 a #s(literal 8 binary64))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 b #s(literal 1/2 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 a (*.f64 b a)) (*.f64 (*.f64 #s(literal 8 binary64) (/.f64 a x-scale)) (/.f64 (*.f64 b (*.f64 b a)) (*.f64 x-scale (*.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 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale))))))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 b (*.f64 a #s(literal 8 binary64))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a))))) #s(literal 1/2 binary64)) (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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale))))))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.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 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale))))))) #s(literal 1/2 binary64)))
(*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))) b) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (*.f64 a (*.f64 b a)) (*.f64 (*.f64 #s(literal 8 binary64) (/.f64 a x-scale)) (/.f64 (*.f64 b (*.f64 b a)) (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 1/2 binary64)))
(*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))) (*.f64 b a)) #s(literal 1/2 binary64)) (pow.f64 (/.f64 (*.f64 b (*.f64 a #s(literal 8 binary64))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a))))) #s(literal 1/2 binary64)))
(*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))) (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64))))) #s(literal 1/2 binary64)) (pow.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a))))) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a))))) (+.f64 (neg.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)))))
(+.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a))))) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))) (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a))))) (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale))))
(+.f64 (*.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a)))))) (*.f64 (+.f64 (neg.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a)))))))
(+.f64 (*.f64 (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a)))))))
(fma.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a))))) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a))))) (+.f64 (neg.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a))))) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale))))) (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a))))) (/.f64 (+.f64 (*.f64 (*.f64 a a) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale))))
(fma.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a))))) (*.f64 (+.f64 (neg.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a)))))))
(fma.f64 (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a)))))))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a))))) (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale)) #s(literal 3 binary64)) (pow.f64 (-.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale))) #s(literal 3 binary64)))) (+.f64 (pow.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (*.f64 (-.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)))))))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a))))) (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (+.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale)) #s(literal 3 binary64)) (pow.f64 (-.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a)))))) (+.f64 (pow.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (*.f64 (-.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (-.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a)))))) (+.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)))))
(*.f64 b (*.f64 a (*.f64 (/.f64 (*.f64 b (*.f64 a #s(literal 8 binary64))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))))))
(*.f64 b (*.f64 (*.f64 (*.f64 a (*.f64 b a)) (*.f64 (*.f64 #s(literal 8 binary64) (/.f64 a x-scale)) (/.f64 (*.f64 b (*.f64 b a)) (*.f64 x-scale (*.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 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale))))))))
(*.f64 a (*.f64 b (*.f64 (/.f64 (*.f64 b (*.f64 a #s(literal 8 binary64))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))))))
(*.f64 (*.f64 b a) (*.f64 (/.f64 (*.f64 b (*.f64 a #s(literal 8 binary64))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale))))))))
(*.f64 (/.f64 (*.f64 b (*.f64 a #s(literal 8 binary64))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale))))))))
(*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-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 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))) (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a))))))
(*.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.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 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale))))))))
(*.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a #s(literal 8 binary64))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))) b) (*.f64 (*.f64 a (*.f64 b a)) (*.f64 (*.f64 #s(literal 8 binary64) (/.f64 a x-scale)) (/.f64 (*.f64 b (*.f64 b a)) (*.f64 x-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 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))) (*.f64 b a)) (/.f64 (*.f64 b (*.f64 a #s(literal 8 binary64))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))) (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64))))) (/.f64 (*.f64 b (*.f64 a (*.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a)))))
(/.f64 (*.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (*.f64 b (*.f64 a (*.f64 b a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (*.f64 (*.f64 b a) (*.f64 (*.f64 b a) (*.f64 #s(literal 8 binary64) (*.f64 b (*.f64 a (*.f64 b a)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (*.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a)))))
(/.f64 (*.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (*.f64 (*.f64 b (*.f64 b a)) (-.f64 #s(literal 0 binary64) a))) (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (-.f64 #s(literal 0 binary64) x-scale)))
(/.f64 (*.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 b (*.f64 a (*.f64 b a))) x-scale)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (*.f64 (*.f64 b a) (*.f64 #s(literal 8 binary64) (*.f64 b (*.f64 a (*.f64 b a))))) (*.f64 b a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 b (*.f64 (*.f64 a (*.f64 b a)) (*.f64 (*.f64 #s(literal 8 binary64) (/.f64 a x-scale)) (/.f64 (*.f64 b (*.f64 b a)) (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 a (*.f64 b (/.f64 (*.f64 b (*.f64 a #s(literal 8 binary64))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a)))))))
(*.f64 (*.f64 b a) (/.f64 (*.f64 b (*.f64 a #s(literal 8 binary64))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a))))))
(*.f64 (*.f64 b (*.f64 a #s(literal 8 binary64))) (*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 b a)))
(*.f64 (*.f64 b (*.f64 a (*.f64 b a))) (*.f64 (*.f64 #s(literal 8 binary64) (/.f64 a x-scale)) (/.f64 (*.f64 b (*.f64 b a)) (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))))
(*.f64 (/.f64 (*.f64 b (*.f64 a #s(literal 8 binary64))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a))))) (*.f64 b a))
(*.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 b (*.f64 a (*.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (*.f64 (*.f64 a (*.f64 b a)) (*.f64 (*.f64 #s(literal 8 binary64) (/.f64 a x-scale)) (/.f64 (*.f64 b (*.f64 b a)) (*.f64 x-scale (*.f64 y-scale y-scale))))) b)
(*.f64 (*.f64 (*.f64 b a) (/.f64 (*.f64 b (*.f64 a (*.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 b (*.f64 a #s(literal 8 binary64))))
(*.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a #s(literal 8 binary64))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a))))) b) a)
(*.f64 (*.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) a) (/.f64 (*.f64 b (*.f64 b a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (*.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (*.f64 b (*.f64 a (*.f64 b a)))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (*.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 a x-scale)) (/.f64 (*.f64 b (*.f64 b a)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(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 (PI.f64) (sqrt.f64 (PI.f64))) #s(literal 1/3 binary64)) (pow.f64 (*.f64 (PI.f64) (sqrt.f64 (PI.f64))) #s(literal 1/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 (*.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)))
(cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))
(cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal -180 binary64)))
(sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))
(neg.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal -180 binary64))))

simplify1.5s (2.3%)

Algorithm
egg-herbie
Rules
7220×*-lowering-*.f32
7220×*-lowering-*.f64
4042×+-lowering-+.f64
4042×+-lowering-+.f32
2198×/-lowering-/.f32
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
01498148818
15617139965
08122139965
Stop Event
iter limit
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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 a a) (*.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 #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 #s(literal -1/8 binary64) (/.f64 (*.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))))))))) (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)))))))) (pow.f64 a #s(literal 6 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 a (neg.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))))))))))
(* -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 #s(literal -1/8 binary64) (/.f64 (*.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))))))))) (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)))))))) (pow.f64 a #s(literal 6 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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 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 (*.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 (*.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 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 (*.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 (*.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 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 (*.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 (*.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 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 (*.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 (*.f64 a a) (*.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 a a) (/.f64 (*.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 (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 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-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 (*.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 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 (*.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 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 (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 (*.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/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 (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 (*.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 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 (+.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))))) (*.f64 #s(literal -1 binary64) (*.f64 a (*.f64 a a))))
(* (/ (* (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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 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 (*.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 (*.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 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 (*.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 (*.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 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 (*.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 (*.f64 a a) (*.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 a a) (/.f64 (*.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 (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 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-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 (*.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 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 (*.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 (*.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 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 (*.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 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.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 (*.f64 #s(literal 8 binary64) (*.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 (*.f64 #s(literal 8 binary64) (*.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 (*.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)))))) (*.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)))))))
(* 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 (*.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)))))) (*.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)))))))
(* 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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b)) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 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 (*.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 (*.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 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 (*.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 (*.f64 a a) (*.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 a a) (/.f64 (*.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 (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 a a)) (-.f64 (*.f64 b b) (*.f64 a a))) (*.f64 y-scale y-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 (*.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 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 (*.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 (*.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 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 (*.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 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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))))

eval291.0ms (0.4%)

Compiler

Compiled 267145 to 5321 computations (98% saved)

prune224.0ms (0.3%)

Pruning

15 alts after pruning (15 fresh and 0 done)

PrunedKeptTotal
New79515810
Fresh000
Picked101
Done000
Total79615811
Accuracy
45.1%
Counts
811 → 15
Alt Table
Click to see full alt table
StatusAccuracyProgram
1.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 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
0.1%
(/.f64 (/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (*.f64 b (*.f64 a (*.f64 b a))) (*.f64 x-scale (*.f64 y-scale y-scale))))
0.5%
(/.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))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
0.2%
(/.f64 (*.f64 (sqrt.f64 (*.f64 b a)) (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a #s(literal 8 binary64))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale))))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
0.2%
(/.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))))) (*.f64 (/.f64 (*.f64 a #s(literal 4 binary64)) x-scale) (/.f64 (*.f64 b (*.f64 b a)) (*.f64 x-scale (*.f64 y-scale y-scale)))))
0.1%
(/.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))))) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
3.3%
(*.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.7%
(*.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.9%
(*.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.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 b b) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (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)))))))
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 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.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 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (cos.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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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))))))))
5.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 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (sin.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))))))))
3.5%
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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.7%
(*.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 4556 to 1368 computations (70% saved)

simplify316.0ms (0.5%)

Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
(sqrt.f64 #s(literal 8 binary64))
cost-diff0
(*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))
cost-diff0
(*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))
cost-diff0
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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-diff0
(*.f64 b x-scale)
cost-diff0
(*.f64 (*.f64 b x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
cost-diff0
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 b x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
cost-diff0
(*.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-diff0
(*.f64 b a)
cost-diff0
(sqrt.f64 (*.f64 b a))
cost-diff0
(*.f64 (sqrt.f64 (*.f64 b a)) (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a #s(literal 8 binary64))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))))))
cost-diff0
(/.f64 (*.f64 (sqrt.f64 (*.f64 b a)) (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a #s(literal 8 binary64))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale))))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
cost-diff0
(*.f64 a (*.f64 a a))
cost-diff0
(*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
cost-diff0
(/.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)))
cost-diff0
(/.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 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
cost-diff0
(*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64)))
cost-diff0
(*.f64 a x-scale)
cost-diff0
(*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64))))
cost-diff0
(*.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
6042×*-lowering-*.f32
6042×*-lowering-*.f64
3722×/-lowering-/.f32
3722×/-lowering-/.f64
1928×sum4-define
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
01253993
14113942
220843908
365463908
082423908
Stop Event
iter limit
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
(/ (/ (* (* a (* a a)) (* (* b b) (* (sqrt 8) (sqrt 2)))) (* x-scale (* y-scale y-scale))) (/ (* 4 (* a (* b (* b a)))) (* x-scale (* y-scale (* x-scale y-scale)))))
(/ (* (* a (* a a)) (* (* b b) (* (sqrt 8) (sqrt 2)))) (* x-scale (* y-scale y-scale)))
(* (* a (* a a)) (* (* b b) (* (sqrt 8) (sqrt 2))))
(* a (* a a))
a
(* a a)
(* (* b b) (* (sqrt 8) (sqrt 2)))
(* b b)
b
(* (sqrt 8) (sqrt 2))
(sqrt 8)
8
(sqrt 2)
2
(* x-scale (* y-scale y-scale))
x-scale
(* y-scale y-scale)
y-scale
(/ (* 4 (* a (* b (* b a)))) (* x-scale (* y-scale (* x-scale y-scale))))
(* 4 (* a (* b (* b a))))
4
(* a (* b (* b a)))
(* b (* b a))
(* b a)
(* x-scale (* y-scale (* x-scale y-scale)))
(* y-scale (* x-scale y-scale))
(* x-scale y-scale)
(/ (* (sqrt (* b a)) (sqrt (* (/ (* b (* a 8)) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a))))) (+ (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (- (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))))))))))) (/ (* 4 (* a (* b (* b a)))) (* x-scale (* y-scale (* x-scale y-scale)))))
(* (sqrt (* b a)) (sqrt (* (/ (* b (* a 8)) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a))))) (+ (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (- (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale)))))))))))
(sqrt (* b a))
(* b a)
b
a
(sqrt (* (/ (* b (* a 8)) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a))))) (+ (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (- (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))))))))))
(* (/ (* b (* a 8)) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a))))) (+ (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (- (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale)))))))))
(/ (* b (* a 8)) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a)))))
(* b (* a 8))
(* a 8)
8
(/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a))))
(* x-scale (* x-scale (* y-scale y-scale)))
x-scale
(* x-scale (* y-scale y-scale))
(* y-scale y-scale)
y-scale
(* b (* a (* b a)))
(* a (* b a))
(+ (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (- (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))))))))
(/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale))
(+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))))
(* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))
(* a a)
(- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))
1/2
(* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))
(cos (* 2 (/ (* angle (PI)) 180)))
(* 2 (/ (* angle (PI)) 180))
2
(/ (* angle (PI)) 180)
(* angle (PI))
angle
(PI)
180
(* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))
(* b b)
(+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))
(* x-scale x-scale)
(- (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale)))))))
(/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))
(+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))))
(* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))))
(* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))
(* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))
(sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))))))
(- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))
(* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale)))
(- (* b b) (* a a))
(/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))
(sin (* 2 (/ (* angle (PI)) 180)))
(* x-scale y-scale)
(/ (* 4 (* a (* b (* b a)))) (* x-scale (* y-scale (* x-scale y-scale))))
(* 4 (* a (* b (* b a))))
4
(* a (* b (* b a)))
(* b (* b a))
(* x-scale (* y-scale (* x-scale y-scale)))
(* y-scale (* 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 (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))))) (/ (* 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 (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))))) (/ (* 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 (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))))) (/ (* 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))
(* 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)) (* -1/2 (/ (+ (* -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 (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))) (+ (/ (* (* 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 (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 (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))))) (/ (* 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 (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))))) (/ (* 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 (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))))) (/ (* 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 (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)))))
-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 (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))
(* 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))
(+ (* (* 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 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (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)
(/ (/ (* (* a (* a a)) (* (* b b) (* (sqrt 8) (sqrt 2)))) (* x-scale (* y-scale y-scale))) (/ (* 4 (* a (* b (* b a)))) (* x-scale (* y-scale (* x-scale y-scale)))))
(/.f64 (*.f64 (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))) (/.f64 (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 b b))) (*.f64 y-scale y-scale)) (*.f64 (*.f64 a #s(literal 4 binary64)) x-scale))) (*.f64 a (*.f64 b b)))
(/ (* (* a (* a a)) (* (* b b) (* (sqrt 8) (sqrt 2)))) (* x-scale (* y-scale y-scale)))
(/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (* a (* a a)) (* (* b b) (* (sqrt 8) (sqrt 2))))
(*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 b b)))
(* a (* a a))
(*.f64 a (*.f64 a a))
a
(* a a)
(*.f64 a a)
(* (* b b) (* (sqrt 8) (sqrt 2)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 b b))
(* b b)
(*.f64 b b)
b
(* (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)
(* x-scale (* y-scale y-scale))
(*.f64 x-scale (*.f64 y-scale y-scale))
x-scale
(* y-scale y-scale)
(*.f64 y-scale y-scale)
y-scale
(/ (* 4 (* a (* b (* b a)))) (* x-scale (* y-scale (* x-scale y-scale))))
(/.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 a b)) #s(literal 4 binary64))) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))
(* 4 (* a (* b (* b a))))
(*.f64 b (*.f64 (*.f64 a (*.f64 a b)) #s(literal 4 binary64)))
4
#s(literal 4 binary64)
(* a (* b (* b a)))
(*.f64 a (*.f64 a (*.f64 b b)))
(* b (* b a))
(*.f64 a (*.f64 b b))
(* b a)
(*.f64 a b)
(* x-scale (* y-scale (* x-scale y-scale)))
(*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))
(* y-scale (* x-scale y-scale))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(/ (* (sqrt (* b a)) (sqrt (* (/ (* b (* a 8)) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a))))) (+ (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (- (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))))))))))) (/ (* 4 (* a (* b (* b a)))) (* x-scale (* y-scale (* x-scale y-scale)))))
(*.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 a b)) (/.f64 (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))) (*.f64 a (*.f64 a (*.f64 b b))))) (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal -1/2 binary64)))) (*.f64 (+.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal 1 binary64)) (*.f64 b (*.f64 b #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 (+.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal 1 binary64)) (*.f64 a #s(literal 1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #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 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal -1/2 binary64)))) (*.f64 (+.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal 1 binary64)) (*.f64 b (*.f64 b #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 (+.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal 1 binary64)) (*.f64 a #s(literal 1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal -1/2 binary64)))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) x-scale) (sin.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64))))) y-scale))))) (*.f64 (/.f64 (sqrt.f64 (*.f64 a b)) (*.f64 b (*.f64 (*.f64 a (*.f64 a b)) #s(literal 4 binary64)))) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))))
(* (sqrt (* b a)) (sqrt (* (/ (* b (* a 8)) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a))))) (+ (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (- (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale)))))))))))
(*.f64 (sqrt.f64 (*.f64 a b)) (sqrt.f64 (*.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 a b)) (/.f64 (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))) (*.f64 a (*.f64 a (*.f64 b b))))) (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal -1/2 binary64)))) (*.f64 (+.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal 1 binary64)) (*.f64 b (*.f64 b #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 (+.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal 1 binary64)) (*.f64 a #s(literal 1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #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 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal -1/2 binary64)))) (*.f64 (+.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal 1 binary64)) (*.f64 b (*.f64 b #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 (+.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal 1 binary64)) (*.f64 a #s(literal 1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal -1/2 binary64)))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) x-scale) (sin.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64))))) y-scale))))))
(sqrt (* b a))
(sqrt.f64 (*.f64 a b))
(* b a)
(*.f64 a b)
b
a
(sqrt (* (/ (* b (* a 8)) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a))))) (+ (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (- (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))))))))))
(sqrt.f64 (*.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 a b)) (/.f64 (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))) (*.f64 a (*.f64 a (*.f64 b b))))) (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal -1/2 binary64)))) (*.f64 (+.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal 1 binary64)) (*.f64 b (*.f64 b #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 (+.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal 1 binary64)) (*.f64 a #s(literal 1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #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 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal -1/2 binary64)))) (*.f64 (+.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal 1 binary64)) (*.f64 b (*.f64 b #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 (+.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal 1 binary64)) (*.f64 a #s(literal 1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal -1/2 binary64)))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) x-scale) (sin.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64))))) y-scale)))))
(* (/ (* b (* a 8)) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a))))) (+ (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (- (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale)))))))))
(*.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 a b)) (/.f64 (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))) (*.f64 a (*.f64 a (*.f64 b b))))) (-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal -1/2 binary64)))) (*.f64 (+.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal 1 binary64)) (*.f64 b (*.f64 b #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 (+.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal 1 binary64)) (*.f64 a #s(literal 1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #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 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal -1/2 binary64)))) (*.f64 (+.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal 1 binary64)) (*.f64 b (*.f64 b #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 (+.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal 1 binary64)) (*.f64 a #s(literal 1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal -1/2 binary64)))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) x-scale) (sin.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64))))) y-scale))))
(/ (* b (* a 8)) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a)))))
(/.f64 (*.f64 #s(literal 8 binary64) (*.f64 a b)) (/.f64 (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))) (*.f64 a (*.f64 a (*.f64 b b)))))
(* b (* a 8))
(*.f64 #s(literal 8 binary64) (*.f64 a b))
(* a 8)
(*.f64 a #s(literal 8 binary64))
8
#s(literal 8 binary64)
(/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a))))
(/.f64 (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))) (*.f64 a (*.f64 a (*.f64 b b))))
(* x-scale (* x-scale (* y-scale y-scale)))
(*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))
x-scale
(* x-scale (* y-scale y-scale))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* y-scale y-scale)
(*.f64 y-scale y-scale)
y-scale
(* b (* a (* b a)))
(*.f64 a (*.f64 a (*.f64 b b)))
(* a (* b a))
(*.f64 a (*.f64 a b))
(+ (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (- (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))))))))
(-.f64 (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal -1/2 binary64)))) (*.f64 (+.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal 1 binary64)) (*.f64 b (*.f64 b #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 (+.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal 1 binary64)) (*.f64 a #s(literal 1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #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 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal -1/2 binary64)))) (*.f64 (+.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal 1 binary64)) (*.f64 b (*.f64 b #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 (+.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal 1 binary64)) (*.f64 a #s(literal 1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal -1/2 binary64)))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) x-scale) (sin.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64))))) y-scale)))
(/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale))
(/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal -1/2 binary64)))) (*.f64 (+.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal 1 binary64)) (*.f64 b (*.f64 b #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale))
(+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))))
(+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal -1/2 binary64)))) (*.f64 (+.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal 1 binary64)) (*.f64 b (*.f64 b #s(literal 1/2 binary64)))))
(* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))
(*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal -1/2 binary64))))
(* a a)
(*.f64 a a)
(- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal -1/2 binary64)))
1/2
#s(literal 1/2 binary64)
(* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))))
(cos (* 2 (/ (* angle (PI)) 180)))
(cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64))))
(* 2 (/ (* angle (PI)) 180))
(*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))
2
#s(literal 2 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)
(* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))
(*.f64 (+.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal 1 binary64)) (*.f64 b (*.f64 b #s(literal 1/2 binary64))))
(* b b)
(*.f64 b b)
(+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64))))))
(* x-scale x-scale)
(*.f64 x-scale x-scale)
(- (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale)))))))
(-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 (+.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal 1 binary64)) (*.f64 a #s(literal 1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #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 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal -1/2 binary64)))) (*.f64 (+.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal 1 binary64)) (*.f64 b (*.f64 b #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 (+.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal 1 binary64)) (*.f64 a #s(literal 1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal -1/2 binary64)))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) x-scale) (sin.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64))))) y-scale)))
(/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))
(/.f64 (+.f64 (*.f64 a (*.f64 (+.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal 1 binary64)) (*.f64 a #s(literal 1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal -1/2 binary64)))))) (*.f64 y-scale y-scale))
(+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))))
(+.f64 (*.f64 a (*.f64 (+.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal 1 binary64)) (*.f64 a #s(literal 1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal -1/2 binary64))))))
(* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))))
(*.f64 a (*.f64 (+.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal 1 binary64)) (*.f64 a #s(literal 1/2 binary64))))
(* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))
(*.f64 (+.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal 1 binary64)) (*.f64 a #s(literal 1/2 binary64)))
(* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))
(*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal -1/2 binary64)))))
(sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))))))
(hypot.f64 (-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal -1/2 binary64)))) (*.f64 (+.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal 1 binary64)) (*.f64 b (*.f64 b #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 (+.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal 1 binary64)) (*.f64 a #s(literal 1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal -1/2 binary64)))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) x-scale) (sin.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64))))) y-scale))
(- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))
(-.f64 (/.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal -1/2 binary64)))) (*.f64 (+.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal 1 binary64)) (*.f64 b (*.f64 b #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 (+.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal 1 binary64)) (*.f64 a #s(literal 1/2 binary64)))) (*.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) #s(literal -1/2 binary64)))))) (*.f64 y-scale y-scale)))
(* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (-.f64 (*.f64 b b) (*.f64 a a)) x-scale) (sin.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64))))) y-scale)
(- (* b b) (* a a))
(-.f64 (*.f64 b b) (*.f64 a a))
(/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))
(/.f64 (sin.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale))
(sin (* 2 (/ (* angle (PI)) 180)))
(sin.f64 (*.f64 angle (/.f64 (*.f64 (PI.f64) #s(literal 2 binary64)) #s(literal 180 binary64))))
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(/ (* 4 (* a (* b (* b a)))) (* x-scale (* y-scale (* x-scale y-scale))))
(/.f64 (*.f64 b (*.f64 (*.f64 a (*.f64 a b)) #s(literal 4 binary64))) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))
(* 4 (* a (* b (* b a))))
(*.f64 b (*.f64 (*.f64 a (*.f64 a b)) #s(literal 4 binary64)))
4
#s(literal 4 binary64)
(* a (* b (* b a)))
(*.f64 a (*.f64 a (*.f64 b b)))
(* b (* b a))
(*.f64 a (*.f64 b b))
(* x-scale (* y-scale (* x-scale y-scale)))
(*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))
(* y-scale (* x-scale y-scale))
(*.f64 x-scale (*.f64 y-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 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 b (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)))) (sqrt.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 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.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 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))) (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))))))))
(* 1/4 (* (* b x-scale) (* y-scale (sqrt 8))))
(*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 b (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-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 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 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 y-scale y-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.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 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))) (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))) (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 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 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 y-scale y-scale)) (sqrt.f64 (+.f64 (/.f64 (*.f64 (*.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 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))) (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)))
(/ (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 (*.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 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))) (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 (*.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 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale)))) (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 (*.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 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (*.f64 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))
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)) (*.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 (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 y-scale (*.f64 y-scale (*.f64 x-scale x-scale))))
(* (* y-scale y-scale) (* x-scale x-scale))
(*.f64 y-scale (*.f64 y-scale (*.f64 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.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 (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))))) (/ (* 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 (sqrt.f64 #s(literal 8 binary64)) #s(literal 1/4 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 #s(literal -1/2 binary64) (+.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) (*.f64 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 (*.f64 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)))) #s(literal -2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) #s(literal 4 binary64))) (*.f64 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) (*.f64 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 (*.f64 b b) x-scale) x-scale))))))))
(* 1/4 (* x-scale (sqrt 8)))
(*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 1/4 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 (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))))) (/ (* 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 #s(literal -1/2 binary64) (+.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) (*.f64 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 (*.f64 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)))) #s(literal -2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) #s(literal 4 binary64))) (*.f64 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) (*.f64 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 (*.f64 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 (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))))) (/ (* 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 #s(literal -1/2 binary64) (+.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) (*.f64 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 (*.f64 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)))) #s(literal -2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) #s(literal 4 binary64))) (*.f64 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) (*.f64 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 (*.f64 b b) x-scale) x-scale))))))
(* (* 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)) (* -1/2 (/ (+ (* -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 (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))) (+ (/ (* (* 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 b b) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (/.f64 (*.f64 #s(literal -1/2 binary64) (+.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) (*.f64 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 (*.f64 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)))) #s(literal -2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) #s(literal 4 binary64))) (*.f64 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) (*.f64 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 (*.f64 b b) x-scale) x-scale)))))
(* (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 (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))))) (/ (* 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 #s(literal -1/2 binary64) (+.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) (*.f64 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 (*.f64 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)))) #s(literal -2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) #s(literal 4 binary64))) (*.f64 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) (*.f64 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 (*.f64 b b) x-scale) x-scale))))
-1/2
#s(literal -1/2 binary64)
(/ (+ (* -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 (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))) (+ (/ (* (* 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 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (/.f64 (*.f64 a a) (*.f64 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 (*.f64 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)))) #s(literal -2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) #s(literal 4 binary64))) (*.f64 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) (*.f64 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 (*.f64 b b) x-scale) x-scale))))
(+ (* -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 (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)))
(+.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) (*.f64 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 (*.f64 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)))) #s(literal -2 binary64))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))
(* -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 (cos (* 1/180 (* angle (PI)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* b b)))))
(*.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) (*.f64 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 (*.f64 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)))) #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))) (+ (* (* a a) (pow (cos (* 1/180 (* angle (PI)))) 2)) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* b b))))
(*.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) (*.f64 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 (*.f64 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 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 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (/.f64 (*.f64 a a) (*.f64 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 (*.f64 b b) x-scale) x-scale)))
(/ (* (* a a) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* x-scale x-scale))
(*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (/.f64 (*.f64 a a) (*.f64 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 (*.f64 b b) 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)))
(+ (* (* 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))))
(/ (* 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 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) #s(literal 4 binary64))) (*.f64 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))))))
(*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))) #s(literal 4 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 (-.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (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) (* (- (* b b) (* a a)) (- (* b b) (* a a))))
(*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))
(* (- (* 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))

localize5.0s (7.5%)

Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy100.0%
(sqrt.f64 #s(literal 8 binary64))
accuracy100.0%
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
accuracy100.0%
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
accuracy3.1%
(PI.f64)
accuracy100.0%
(sqrt.f64 #s(literal 8 binary64))
accuracy100.0%
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
accuracy100.0%
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
accuracy3.1%
(PI.f64)
accuracy100.0%
(sqrt.f64 (*.f64 b a))
accuracy100.0%
(sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))))
accuracy100.0%
(cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))))
accuracy3.1%
(PI.f64)
accuracy100.0%
(*.f64 a a)
accuracy100.0%
(*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a))))
accuracy100.0%
(sqrt.f64 #s(literal 8 binary64))
accuracy100.0%
(sqrt.f64 #s(literal 2 binary64))
accuracy100.0%
(*.f64 a x-scale)
accuracy100.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)))))
accuracy100.0%
(sqrt.f64 #s(literal 8 binary64))
accuracy100.0%
(sqrt.f64 #s(literal 2 binary64))
Results
4.4s256×5exit
Compiler

Compiled 4101 to 123 computations (97% saved)

Precisions
Click to see histograms. Total time spent on operations: 3.6s
ival-sin: 1.0s (28.8% of total)
ival-cos: 894.0ms (24.8% of total)
ival-mult: 629.0ms (17.4% of total)
backward-pass: 311.0ms (8.6% of total)
ival-div: 249.0ms (6.9% of total)
ival-sqrt: 111.0ms (3.1% of total)
...c/correct-round.rkt:119:19: 99.0ms (2.7% of total)
ival-add: 90.0ms (2.5% of total)
ival-pow: 86.0ms (2.4% of total)
ival-sub: 53.0ms (1.5% of total)
compiled-spec: 37.0ms (1% of total)
ival-pi: 7.0ms (0.2% of total)
const: 6.0ms (0.2% of total)

series643.0ms (1%)

Counts
28 → 672
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 (/ (/ (* (* a (* a a)) (* (* b b) (* (sqrt 8) (sqrt 2)))) (* x-scale (* y-scale y-scale))) (/ (* 4 (* a (* b (* b a)))) (* x-scale (* y-scale (* x-scale y-scale)))))>
#<alt (/ (* (* a (* a a)) (* (* b b) (* (sqrt 8) (sqrt 2)))) (* x-scale (* y-scale y-scale)))>
#<alt (* (* a (* a a)) (* (* b b) (* (sqrt 8) (sqrt 2))))>
#<alt (* a (* a a))>
#<alt (/ (* (sqrt (* b a)) (sqrt (* (/ (* b (* a 8)) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a))))) (+ (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (- (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))))))))))) (/ (* 4 (* a (* b (* b a)))) (* x-scale (* y-scale (* x-scale y-scale)))))>
#<alt (* (sqrt (* b a)) (sqrt (* (/ (* b (* a 8)) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a))))) (+ (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (- (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale)))))))))))>
#<alt (sqrt (* b a))>
#<alt (* b a)>
#<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 (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))))) (/ (* 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 (sqrt 2)>
#<alt (* 4 (* a (* b (* b a))))>
#<alt (* a a)>
#<alt (PI)>
#<alt (cos (* 2 (/ (* angle (PI)) 180)))>
#<alt (sin (* 2 (/ (* angle (PI)) 180)))>
#<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/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 (* 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 (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))>
#<alt (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))>
#<alt (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))>
#<alt (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))>
#<alt (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))>
#<alt (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))>
#<alt (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))>
#<alt (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))>
#<alt (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))>
#<alt (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))>
#<alt (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))>
#<alt (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))>
#<alt (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))>
#<alt (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))>
#<alt (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))>
#<alt (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))>
#<alt (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))>
#<alt (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))>
#<alt (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))>
#<alt (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))>
#<alt (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))>
#<alt (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))>
#<alt (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))>
#<alt (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))>
#<alt (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))>
#<alt (pow a 3)>
#<alt (pow a 3)>
#<alt (pow a 3)>
#<alt (pow a 3)>
#<alt (pow a 3)>
#<alt (pow a 3)>
#<alt (pow a 3)>
#<alt (pow a 3)>
#<alt (pow a 3)>
#<alt (pow a 3)>
#<alt (pow a 3)>
#<alt (pow a 3)>
#<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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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) (* (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))) (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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) (* (sqrt -1) (+ (* 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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) (* (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))) (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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) (* (sqrt -1) (+ (* -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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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) (* (sqrt -1) (+ (* 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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) (* (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))) (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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) (* (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))) (* 1/2 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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) (* (sqrt -1) (+ (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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) (* (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))) (* 1/2 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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) (* (sqrt -1) (+ (* -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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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) (* (sqrt -1) (+ (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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) (* (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))) (* 1/2 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (* (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (* 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 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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))))) (/ (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (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)))))) (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 (+ (/ (* (pow (sin (* 1/90 (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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 (* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (pow b 2) (+ (* 1/2 (* (/ (* (pow a 2) (* (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 2) (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (pow b 2) (+ (* (/ (* (pow a 2) (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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/2 (* (/ (* (pow a 2) (* (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (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 x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (pow b 2) (+ (* (/ (* (pow a 2) (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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/2 (* (/ (* (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 x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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/2 (* (/ (* (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 x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow a 2) (* (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow a 2) (* (pow b 3) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (pow b 3) (+ (* 1/2 (* (/ (* (pow a 2) (* (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (* (/ (* (pow a 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (pow b 3) (+ (* -1/2 (* (/ (* (pow a 2) (* (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (/ (* (pow a 2) (* (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (* (/ (* (pow a 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (pow b 3) (+ (* -1/2 (* (/ (* (pow a 2) (* (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (/ (* (pow a 2) (* (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (/ (* (pow a 2) (* (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (* (/ (* (pow a 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (/ (* (pow a 2) (* (pow b 3) (* (sqrt -8) (sqrt -1)))) (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (pow b 3) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt -8) (* (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))) (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (* (/ (* (pow a 2) (* (sqrt -8) (sqrt -1))) (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (pow b 3) (+ (* -1/2 (* (/ (* (pow a 2) (* (sqrt -8) (* (sqrt -1) (+ (* 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (/ (* (pow a 2) (* (sqrt -8) (* (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))) (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (* (/ (* (pow a 2) (* (sqrt -8) (sqrt -1))) (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (pow b 3) (+ (* -1/2 (* (/ (* (pow a 2) (* (sqrt -8) (* (sqrt -1) (+ (* -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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (/ (* (pow a 2) (* (sqrt -8) (* (sqrt -1) (+ (* 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (/ (* (pow a 2) (* (sqrt -8) (* (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))) (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (* (/ (* (pow a 2) (* (sqrt -8) (sqrt -1))) (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (pow a 2) (+ (* 1/2 (* (/ (* (pow a 2) (* (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 y-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 2) (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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (pow a 2) (+ (* (/ (* (pow b 2) (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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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/2 (* (/ (* (pow a 2) (* (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 y-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (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 y-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (pow a 2) (+ (* (/ (* (pow b 2) (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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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/2 (* (/ (* (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 y-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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/2 (* (/ (* (pow a 2) (* (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 y-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (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 y-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow a 3) (* (pow b 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (pow a 3) (+ (* 1/2 (* (/ (* (pow b 2) (* (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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (* (/ (* (pow b 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (pow a 3) (+ (* -1/2 (* (/ (* (pow b 2) (* (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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (/ (* (pow b 2) (* (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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (* (/ (* (pow b 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (pow a 3) (+ (* -1/2 (* (/ (* (pow b 2) (* (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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (/ (* (pow b 2) (* (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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (/ (* (pow b 2) (* (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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (* (/ (* (pow b 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (/ (* (pow a 3) (* (pow b 2) (* (sqrt -8) (sqrt -1)))) (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (pow a 3) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt -8) (* (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))) (* 1/2 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (* (/ (* (pow b 2) (* (sqrt -8) (sqrt -1))) (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (pow a 3) (+ (* -1/2 (* (/ (* (pow b 2) (* (sqrt -8) (* (sqrt -1) (+ (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (/ (* (pow b 2) (* (sqrt -8) (* (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))) (* 1/2 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (* (/ (* (pow b 2) (* (sqrt -8) (sqrt -1))) (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (pow a 3) (+ (* -1/2 (* (/ (* (pow b 2) (* (sqrt -8) (* (sqrt -1) (+ (* -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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (/ (* (pow b 2) (* (sqrt -8) (* (sqrt -1) (+ (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (/ (* (pow b 2) (* (sqrt -8) (* (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))) (* 1/2 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (* (/ (* (pow b 2) (* (sqrt -8) (sqrt -1))) (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (/ (+ (* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (/ (+ (* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/4 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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/2 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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/2 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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/2 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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/2 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (/ (+ (* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (/ (+ (* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/4 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (/ (* (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))) (+ (* 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 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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) (- (+ (* -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 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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))))) (/ (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (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)))))) (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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))) (+ (* 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 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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 (* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow (sin (* 1/90 (* 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 (* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow (sin (* 1/90 (* 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 (* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow (sin (* 1/90 (* 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 (* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow (sin (* 1/90 (* 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 (* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow (sin (* 1/90 (* 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 (* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow (sin (* 1/90 (* 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 (* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow (sin (* 1/90 (* 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 (sqrt (* a b))>
#<alt (sqrt (* a b))>
#<alt (sqrt (* a b))>
#<alt (sqrt (* a b))>
#<alt (sqrt (* a b))>
#<alt (sqrt (* a b))>
#<alt (sqrt (* a b))>
#<alt (sqrt (* a b))>
#<alt (* -1 (* (sqrt (* a b)) (pow (sqrt -1) 2)))>
#<alt (* -1 (* (sqrt (* a b)) (pow (sqrt -1) 2)))>
#<alt (* -1 (* (sqrt (* a b)) (pow (sqrt -1) 2)))>
#<alt (* -1 (* (sqrt (* a b)) (pow (sqrt -1) 2)))>
#<alt (sqrt (* a b))>
#<alt (sqrt (* a b))>
#<alt (sqrt (* a b))>
#<alt (sqrt (* a b))>
#<alt (sqrt (* a b))>
#<alt (sqrt (* a b))>
#<alt (sqrt (* a b))>
#<alt (sqrt (* a b))>
#<alt (* -1 (* (sqrt (* a b)) (pow (sqrt -1) 2)))>
#<alt (* -1 (* (sqrt (* a b)) (pow (sqrt -1) 2)))>
#<alt (* -1 (* (sqrt (* a b)) (pow (sqrt -1) 2)))>
#<alt (* -1 (* (sqrt (* a b)) (pow (sqrt -1) 2)))>
#<alt (* a b)>
#<alt (* a b)>
#<alt (* a b)>
#<alt (* a b)>
#<alt (* a b)>
#<alt (* a b)>
#<alt (* a b)>
#<alt (* a b)>
#<alt (* a b)>
#<alt (* a b)>
#<alt (* a b)>
#<alt (* a b)>
#<alt (* a b)>
#<alt (* a b)>
#<alt (* a b)>
#<alt (* a b)>
#<alt (* a b)>
#<alt (* a b)>
#<alt (* a b)>
#<alt (* a b)>
#<alt (* a b)>
#<alt (* a b)>
#<alt (* a b)>
#<alt (* a b)>
#<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 (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (pow a 2)>
#<alt (pow a 2)>
#<alt (pow a 2)>
#<alt (pow a 2)>
#<alt (pow a 2)>
#<alt (pow a 2)>
#<alt (pow a 2)>
#<alt (pow a 2)>
#<alt (pow a 2)>
#<alt (pow a 2)>
#<alt (pow a 2)>
#<alt (pow a 2)>
#<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/90 (* angle (PI)))>
#<alt (* angle (+ (* -1/4374000 (* (pow angle 2) (pow (PI) 3))) (* 1/90 (PI))))>
#<alt (* angle (+ (* 1/90 (PI)) (* (pow angle 2) (+ (* -1/4374000 (pow (PI) 3)) (* 1/708588000000 (* (pow angle 2) (pow (PI) 5)))))))>
#<alt (* angle (+ (* 1/90 (PI)) (* (pow angle 2) (+ (* -1/4374000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/241061637600000000 (* (pow angle 2) (pow (PI) 7))) (* 1/708588000000 (pow (PI) 5))))))))>
#<alt (sin (* 1/90 (* angle (PI))))>
#<alt (sin (* 1/90 (* angle (PI))))>
#<alt (sin (* 1/90 (* angle (PI))))>
#<alt (sin (* 1/90 (* angle (PI))))>
#<alt (sin (* 1/90 (* angle (PI))))>
#<alt (sin (* 1/90 (* angle (PI))))>
#<alt (sin (* 1/90 (* angle (PI))))>
#<alt (sin (* 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))))>
Calls

168 calls:

TimeVariablePointExpression
69.0ms
y-scale
@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))))))
34.0ms
angle
@0
(* (* 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 (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))))) (/ (* 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)))))))))
25.0ms
b
@inf
(/ (* (sqrt (* b a)) (sqrt (* (/ (* b (* a 8)) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a))))) (+ (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (- (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))))))))))) (/ (* 4 (* a (* b (* b a)))) (* x-scale (* y-scale (* x-scale y-scale)))))
22.0ms
a
@0
(* (* 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 (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))))) (/ (* 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)))))))))
19.0ms
y-scale
@0
(/ (* (sqrt (* b a)) (sqrt (* (/ (* b (* a 8)) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a))))) (+ (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (- (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))))))))))) (/ (* 4 (* a (* b (* b a)))) (* x-scale (* y-scale (* x-scale y-scale)))))

rewrite445.0ms (0.7%)

Algorithm
batch-egg-rewrite
Rules
6434×*-lowering-*.f32
6434×*-lowering-*.f64
3712×/-lowering-/.f32
3712×/-lowering-/.f64
1520×+-lowering-+.f64
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
0125818
1812665
08373665
Stop Event
iter limit
node limit
Counts
28 → 283
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))
(/ (/ (* (* a (* a a)) (* (* b b) (* (sqrt 8) (sqrt 2)))) (* x-scale (* y-scale y-scale))) (/ (* 4 (* a (* b (* b a)))) (* x-scale (* y-scale (* x-scale y-scale)))))
(/ (* (* a (* a a)) (* (* b b) (* (sqrt 8) (sqrt 2)))) (* x-scale (* y-scale y-scale)))
(* (* a (* a a)) (* (* b b) (* (sqrt 8) (sqrt 2))))
(* a (* a a))
(/ (* (sqrt (* b a)) (sqrt (* (/ (* b (* a 8)) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a))))) (+ (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (- (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))))))))))) (/ (* 4 (* a (* b (* b a)))) (* x-scale (* y-scale (* x-scale y-scale)))))
(* (sqrt (* b a)) (sqrt (* (/ (* b (* a 8)) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a))))) (+ (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (- (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale)))))))))))
(sqrt (* b a))
(* b a)
(* (* 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 (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))))) (/ (* 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)
(sqrt 2)
(* 4 (* a (* b (* b a))))
(* a a)
(PI)
(cos (* 2 (/ (* angle (PI)) 180)))
(sin (* 2 (/ (* angle (PI)) 180)))
(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 a x-scale) #s(literal 1/4 binary64)))
(*.f64 #s(literal 1 binary64) (*.f64 a x-scale))
(*.f64 (*.f64 x-scale (*.f64 a (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) (*.f64 a x-scale)) #s(literal 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 x-scale (*.f64 a (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 #s(literal 4 binary64) (*.f64 a x-scale))
(*.f64 (*.f64 #s(literal 4 binary64) a) x-scale)
(*.f64 (*.f64 x-scale (*.f64 a (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 #s(literal 4 binary64) x-scale) a)
(*.f64 a x-scale)
(*.f64 x-scale a)
#s(literal 4 binary64)
(neg.f64 (/.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 a b))) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(neg.f64 (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 b (*.f64 a (*.f64 a b))) #s(literal -4 binary64))) (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) x-scale))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) (*.f64 (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) x-scale)) (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) x-scale)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 a a) (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64))))) (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) x-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) x-scale)) (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 (*.f64 a a) (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) (*.f64 y-scale (*.f64 x-scale y-scale)))) #s(literal 1 binary64)))
(/.f64 (*.f64 a (*.f64 (*.f64 b (*.f64 a (*.f64 a b))) #s(literal -4 binary64))) (neg.f64 (*.f64 (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) x-scale)) (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 b (*.f64 a (*.f64 a b))) #s(literal -4 binary64))) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 a b))) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) (*.f64 y-scale (*.f64 x-scale y-scale))))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) x-scale))))
(/.f64 (*.f64 (*.f64 a (*.f64 (*.f64 b (*.f64 a (*.f64 a b))) #s(literal -4 binary64))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) x-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) x-scale) #s(literal 1 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) x-scale))))
(pow.f64 (/.f64 (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) (*.f64 y-scale (*.f64 x-scale y-scale)))) #s(literal -1 binary64))
(*.f64 (*.f64 a (*.f64 a a)) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))))))
(*.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) x-scale)) (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))))))
(*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64))))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) (*.f64 (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) x-scale)) (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 (*.f64 a (*.f64 (*.f64 b (*.f64 a (*.f64 a b))) #s(literal -4 binary64))) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 a b))) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (/.f64 (*.f64 a (*.f64 a a)) x-scale) (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))))))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a (*.f64 a a)) #s(literal 4 binary64)) (/.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 (/.f64 b (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a (*.f64 a b)) x-scale))))
(*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) #s(literal 4 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 (/.f64 b (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a (*.f64 a b)) x-scale))))
(*.f64 (/.f64 (/.f64 (*.f64 a (*.f64 a a)) x-scale) #s(literal 4 binary64)) (/.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (*.f64 (/.f64 b (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a (*.f64 a b)) x-scale))))
(*.f64 (/.f64 a (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) x-scale))) (/.f64 (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a (*.f64 a a)) (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) x-scale))) (/.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) x-scale))) (/.f64 (*.f64 a (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) x-scale))) (/.f64 #s(literal 4 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a (*.f64 a a)) (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (/.f64 (*.f64 a (*.f64 a a)) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64))))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 (/.f64 (*.f64 a (*.f64 a a)) x-scale) (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64))))) (/.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (/.f64 (/.f64 (*.f64 a (*.f64 a a)) x-scale) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64))))) x-scale) (*.f64 y-scale (*.f64 x-scale y-scale)))
(*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64))))) y-scale) (*.f64 y-scale (*.f64 x-scale x-scale)))
(*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64))))) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)
(*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64))))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale))
(*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64))))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
(neg.f64 (/.f64 (*.f64 a (*.f64 (*.f64 b (*.f64 a (*.f64 a b))) #s(literal -4 binary64))) (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 a a) (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 a a) (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) x-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b (*.f64 a (*.f64 a b))) #s(literal -4 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) x-scale) (*.f64 y-scale y-scale))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 a a) (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))))))
(/.f64 (neg.f64 (*.f64 a (*.f64 (*.f64 b (*.f64 a (*.f64 a b))) #s(literal -4 binary64)))) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) x-scale)) (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale)))
(pow.f64 (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 a a) (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64))))) #s(literal -1 binary64))
(*.f64 a (*.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 a (*.f64 (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 a a) (*.f64 a (/.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 a (*.f64 a a)) (/.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 (*.f64 a (*.f64 a a)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 a (*.f64 (*.f64 b (*.f64 a (*.f64 a b))) #s(literal -4 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 (*.f64 a (*.f64 a a)) x-scale) (/.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a (*.f64 a a)) x-scale))
(*.f64 (*.f64 a (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 #s(literal 4 binary64) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) x-scale) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 a x-scale) (/.f64 (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 a y-scale) (/.f64 (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 a (*.f64 y-scale y-scale)) (/.f64 (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) x-scale))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) y-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 a a)) y-scale) (/.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 a a)) y-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 a a)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) x-scale))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) x-scale) (/.f64 (*.f64 a (*.f64 a a)) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 a a)) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) y-scale))
(*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) y-scale) (/.f64 (*.f64 a (*.f64 a a)) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 b (*.f64 a (*.f64 a b)))) x-scale) (/.f64 #s(literal 4 binary64) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 b (*.f64 a (*.f64 a b)))) y-scale) (/.f64 #s(literal 4 binary64) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 y-scale y-scale)) (/.f64 #s(literal 4 binary64) x-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 x-scale y-scale)) (/.f64 #s(literal 4 binary64) y-scale))
(*.f64 a (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))))
(*.f64 (*.f64 a a) (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64))))
(*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(*.f64 b (*.f64 (*.f64 b #s(literal 4 binary64)) (*.f64 a (*.f64 a a))))
(*.f64 (*.f64 b b) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))))
(*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 a (*.f64 a a)))
(*.f64 #s(literal 4 binary64) (*.f64 (*.f64 b b) (*.f64 a (*.f64 a a))))
(*.f64 (*.f64 b (*.f64 b (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 a (*.f64 a a))))
(*.f64 (*.f64 a (*.f64 b (*.f64 a (*.f64 a b)))) #s(literal 4 binary64))
(*.f64 (*.f64 (*.f64 a (*.f64 a a)) b) (*.f64 b #s(literal 4 binary64)))
(*.f64 (*.f64 (*.f64 a (*.f64 a a)) #s(literal 4 binary64)) (*.f64 b b))
(*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b (*.f64 b (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) a) (*.f64 a a))
(*.f64 (*.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 a a)) a)
(exp.f64 (*.f64 (log.f64 a) #s(literal 3 binary64)))
(pow.f64 a #s(literal 3 binary64))
(*.f64 a (*.f64 a a))
(*.f64 (*.f64 a a) a)
(*.f64 (pow.f64 a #s(literal 3/2 binary64)) (pow.f64 a #s(literal 3/2 binary64)))
(neg.f64 (/.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 a b) (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 a b)) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 b (*.f64 a (*.f64 a b)))))) (+.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 (*.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)) (hypot.f64 (-.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale x-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 (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 a a)) (/.f64 (*.f64 x-scale y-scale) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (/.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 a b))) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 (*.f64 (*.f64 (*.f64 a b) (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 a b)) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 b (*.f64 a (*.f64 a b)))))) (+.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 (*.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)) (hypot.f64 (-.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale x-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 (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 a a)) (/.f64 (*.f64 x-scale y-scale) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))))) (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) x-scale))))
(/.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 a b) (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 a b)) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 b (*.f64 a (*.f64 a b)))))) (+.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 (*.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)) (hypot.f64 (-.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale x-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 (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 a a)) (/.f64 (*.f64 x-scale y-scale) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) x-scale)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) x-scale)) (sqrt.f64 (*.f64 (*.f64 (*.f64 a b) (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 a b)) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 b (*.f64 a (*.f64 a b)))))) (+.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 (*.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)) (hypot.f64 (-.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale x-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 (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 a a)) (/.f64 (*.f64 x-scale y-scale) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) x-scale)) (sqrt.f64 (*.f64 (*.f64 (*.f64 a b) (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 a b)) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 b (*.f64 a (*.f64 a b)))))) (+.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 (*.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)) (hypot.f64 (-.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale x-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 (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 a a)) (/.f64 (*.f64 x-scale y-scale) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))))) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 (*.f64 (*.f64 (*.f64 a b) (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 a b)) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 b (*.f64 a (*.f64 a b)))))) (+.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 (*.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)) (hypot.f64 (-.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale x-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 (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 a a)) (/.f64 (*.f64 x-scale y-scale) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))))) (/.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 a b))) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) x-scale)) (sqrt.f64 (*.f64 (*.f64 (*.f64 a b) (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 a b)) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 b (*.f64 a (*.f64 a b)))))) (+.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 (*.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)) (hypot.f64 (-.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale x-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 (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 a a)) (/.f64 (*.f64 x-scale y-scale) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 (*.f64 (*.f64 (*.f64 a b) (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 a b)) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 b (*.f64 a (*.f64 a b)))))) (+.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 (*.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)) (hypot.f64 (-.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale x-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 (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 a a)) (/.f64 (*.f64 x-scale y-scale) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))))) (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) x-scale)))
(pow.f64 (/.f64 (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) x-scale)) (sqrt.f64 (*.f64 (*.f64 (*.f64 a b) (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 a b)) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 b (*.f64 a (*.f64 a b)))))) (+.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 (*.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)) (hypot.f64 (-.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale x-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 (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 a a)) (/.f64 (*.f64 x-scale y-scale) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))))) #s(literal -1 binary64))
(*.f64 (pow.f64 (*.f64 a b) #s(literal 1/2 binary64)) (/.f64 (sqrt.f64 (/.f64 (+.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 (*.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)) (hypot.f64 (-.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale x-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 (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 a a)) (/.f64 (*.f64 x-scale y-scale) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 #s(literal 8 binary64) (*.f64 a b))))) (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) x-scale))))
(*.f64 (sqrt.f64 (/.f64 (+.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 (*.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)) (hypot.f64 (-.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale x-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 (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 a a)) (/.f64 (*.f64 x-scale y-scale) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 #s(literal 8 binary64) (*.f64 a b))))) (*.f64 (pow.f64 (*.f64 a b) #s(literal 1/2 binary64)) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))))))
(*.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 a b) (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 a b)) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 b (*.f64 a (*.f64 a b)))))) (+.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 (*.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)) (hypot.f64 (-.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale x-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 (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 a a)) (/.f64 (*.f64 x-scale y-scale) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64))))))
(*.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 a b) (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 a b)) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 b (*.f64 a (*.f64 a b)))))) (+.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 (*.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)) (hypot.f64 (-.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale x-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 (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 a a)) (/.f64 (*.f64 x-scale y-scale) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) x-scale))))
(*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 (*.f64 (*.f64 (*.f64 a b) (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 a b)) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 b (*.f64 a (*.f64 a b)))))) (+.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 (*.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)) (hypot.f64 (-.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale x-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 (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 a a)) (/.f64 (*.f64 x-scale y-scale) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))))) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 a b))) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (/.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 a b) (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 a b)) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 b (*.f64 a (*.f64 a b)))))) (+.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 (*.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)) (hypot.f64 (-.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale x-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 (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 a a)) (/.f64 (*.f64 x-scale y-scale) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (sqrt.f64 b) (*.f64 (sqrt.f64 a) (/.f64 (sqrt.f64 (/.f64 (+.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 (*.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)) (hypot.f64 (-.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale x-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 (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 a a)) (/.f64 (*.f64 x-scale y-scale) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 #s(literal 8 binary64) (*.f64 a b))))) (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) x-scale)))))
(*.f64 (/.f64 (pow.f64 (*.f64 a b) #s(literal 1/2 binary64)) #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 (*.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 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 (*.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)) (hypot.f64 (-.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale x-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 (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 a a)) (/.f64 (*.f64 x-scale y-scale) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 #s(literal 8 binary64) (*.f64 a b))))) (*.f64 (/.f64 b (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a (*.f64 a b)) x-scale))))
(*.f64 (/.f64 (pow.f64 (*.f64 a b) #s(literal 1/2 binary64)) (*.f64 a (*.f64 a (*.f64 (*.f64 b 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 (*.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 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 (*.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)) (hypot.f64 (-.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale x-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 (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 a a)) (/.f64 (*.f64 x-scale y-scale) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 #s(literal 8 binary64) (*.f64 a b))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (/.f64 (pow.f64 (*.f64 a b) #s(literal 1/2 binary64)) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (sqrt.f64 (/.f64 (+.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 (*.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)) (hypot.f64 (-.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale x-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 (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 a a)) (/.f64 (*.f64 x-scale y-scale) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 #s(literal 8 binary64) (*.f64 a b))))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) (*.f64 y-scale (*.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 (*.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 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 (*.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)) (hypot.f64 (-.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale x-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 (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 a a)) (/.f64 (*.f64 x-scale y-scale) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 #s(literal 8 binary64) (*.f64 a b))))) #s(literal 4 binary64)) (/.f64 (pow.f64 (*.f64 a b) #s(literal 1/2 binary64)) (*.f64 (/.f64 b (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a (*.f64 a 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 (*.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 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 (*.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)) (hypot.f64 (-.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale x-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 (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 a a)) (/.f64 (*.f64 x-scale y-scale) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 #s(literal 8 binary64) (*.f64 a b))))) (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64))))) (/.f64 (pow.f64 (*.f64 a b) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.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 (*.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 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 (*.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)) (hypot.f64 (-.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale x-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 (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 a a)) (/.f64 (*.f64 x-scale y-scale) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 #s(literal 8 binary64) (*.f64 a b))))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (pow.f64 (*.f64 a b) #s(literal 1/2 binary64)) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 a b) (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 a b)) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 b (*.f64 a (*.f64 a b)))))) (+.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 (*.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)) (hypot.f64 (-.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale x-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 (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 a a)) (/.f64 (*.f64 x-scale y-scale) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64))))) x-scale) (*.f64 y-scale (*.f64 x-scale y-scale)))
(*.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 a b) (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 a b)) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 b (*.f64 a (*.f64 a b)))))) (+.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 (*.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)) (hypot.f64 (-.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale x-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 (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 a a)) (/.f64 (*.f64 x-scale y-scale) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64))))) y-scale) (*.f64 y-scale (*.f64 x-scale x-scale)))
(*.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 a b) (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 a b)) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 b (*.f64 a (*.f64 a b)))))) (+.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 (*.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)) (hypot.f64 (-.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale x-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 (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 a a)) (/.f64 (*.f64 x-scale y-scale) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64))))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(*.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 a b) (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 a b)) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 b (*.f64 a (*.f64 a b)))))) (+.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 (*.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)) (hypot.f64 (-.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale x-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 (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 a a)) (/.f64 (*.f64 x-scale y-scale) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64))))) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)
(*.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 a b) (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 a b)) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 b (*.f64 a (*.f64 a b)))))) (+.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 (*.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)) (hypot.f64 (-.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale x-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 (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 a a)) (/.f64 (*.f64 x-scale y-scale) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64))))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale))
(*.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 a b) (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 a b)) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 b (*.f64 a (*.f64 a b)))))) (+.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 (*.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)) (hypot.f64 (-.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale x-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 (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 a a)) (/.f64 (*.f64 x-scale y-scale) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64))))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
(sqrt.f64 (*.f64 (*.f64 (*.f64 a b) (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 a b)) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 b (*.f64 a (*.f64 a b)))))) (+.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 (*.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)) (hypot.f64 (-.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale x-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 (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 a a)) (/.f64 (*.f64 x-scale y-scale) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))))
(sqrt.f64 (*.f64 (/.f64 (+.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 (*.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)) (hypot.f64 (-.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale x-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 (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 a a)) (/.f64 (*.f64 x-scale y-scale) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (*.f64 a b)))
(pow.f64 (*.f64 (*.f64 (*.f64 a b) (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 a b)) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 b (*.f64 a (*.f64 a b)))))) (+.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 (*.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)) (hypot.f64 (-.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale x-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 (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 a a)) (/.f64 (*.f64 x-scale y-scale) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))) #s(literal 1/2 binary64))
(pow.f64 (*.f64 (/.f64 (+.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 (*.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)) (hypot.f64 (-.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale x-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 (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 a a)) (/.f64 (*.f64 x-scale y-scale) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 #s(literal 8 binary64) (*.f64 a b)))) (*.f64 a b)) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (*.f64 a b) #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 (+.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 (*.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)) (hypot.f64 (-.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale x-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 (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 a a)) (/.f64 (*.f64 x-scale y-scale) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 #s(literal 8 binary64) (*.f64 a b))))))
(*.f64 (sqrt.f64 (/.f64 (+.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 (*.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)) (hypot.f64 (-.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale x-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 (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 a a)) (/.f64 (*.f64 x-scale y-scale) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 #s(literal 8 binary64) (*.f64 a b))))) (pow.f64 (*.f64 a b) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 b) (*.f64 (sqrt.f64 a) (sqrt.f64 (/.f64 (+.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 (*.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)) (hypot.f64 (-.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale x-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 (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 a a)) (/.f64 (*.f64 x-scale y-scale) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 #s(literal 8 binary64) (*.f64 a b)))))))
(*.f64 (sqrt.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 a b)) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 b (*.f64 a (*.f64 a b)))))) (*.f64 (sqrt.f64 (+.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 (*.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)) (hypot.f64 (-.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale x-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 (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 a a)) (/.f64 (*.f64 x-scale y-scale) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))) (pow.f64 (*.f64 a b) #s(literal 1/2 binary64))))
(*.f64 (*.f64 (pow.f64 (*.f64 a b) #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 a b)) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 b (*.f64 a (*.f64 a b))))))) (sqrt.f64 (+.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 (*.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)) (hypot.f64 (-.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale x-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 (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 a a)) (/.f64 (*.f64 x-scale y-scale) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 (+.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 (*.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)) (hypot.f64 (-.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale x-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 (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 a a)) (/.f64 (*.f64 x-scale y-scale) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 #s(literal 8 binary64) (*.f64 a b))))) (sqrt.f64 b)) (sqrt.f64 a))
(exp.f64 (*.f64 (log.f64 (*.f64 a b)) #s(literal 1/2 binary64)))
(sqrt.f64 (*.f64 a b))
(pow.f64 (*.f64 a b) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 a) (sqrt.f64 b))
(*.f64 (sqrt.f64 b) (sqrt.f64 a))
(*.f64 (pow.f64 (*.f64 a b) #s(literal 1/4 binary64)) (pow.f64 (*.f64 a b) #s(literal 1/4 binary64)))
(*.f64 a b)
(*.f64 b a)
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale) (*.f64 (*.f64 x-scale b) (sqrt.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 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 x-scale x-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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-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))))) (pow.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 x-scale x-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 y-scale y-scale))) #s(literal 2 binary64))))))))))
(*.f64 (*.f64 b (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale))) (*.f64 #s(literal 1/4 binary64) (sqrt.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 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 x-scale x-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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-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))))) (pow.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 x-scale x-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 y-scale y-scale))) #s(literal 2 binary64)))))))))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)))) (sqrt.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 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 x-scale x-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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-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))))) (pow.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 x-scale x-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 y-scale y-scale))) #s(literal 2 binary64))))))))
(*.f64 (sqrt.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 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 x-scale x-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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-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))))) (pow.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 x-scale x-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 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)))))
(*.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 #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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-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))))) (pow.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 x-scale x-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 y-scale y-scale))) #s(literal 2 binary64)))))))))
(*.f64 (*.f64 (sqrt.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 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 x-scale x-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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-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))))) (pow.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 x-scale x-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 y-scale y-scale))) #s(literal 2 binary64))))))) #s(literal 1/4 binary64)) (*.f64 b (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale))))
(*.f64 (*.f64 (sqrt.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 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 x-scale x-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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-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))))) (pow.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 x-scale x-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 y-scale y-scale))) #s(literal 2 binary64))))))) (*.f64 b (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)))) #s(literal 1/4 binary64))
(*.f64 (*.f64 (sqrt.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 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 x-scale x-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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-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))))) (pow.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 x-scale x-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 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 b (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale))))
(*.f64 b (*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale)) #s(literal 1/4 binary64)))
(*.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 (*.f64 x-scale b) #s(literal 1/4 binary64)))
(*.f64 (*.f64 b (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) y-scale))) #s(literal 1/4 binary64))
(*.f64 (*.f64 x-scale (*.f64 b 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 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) 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 x-scale (*.f64 b 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 y-scale (*.f64 x-scale b)))
(*.f64 b (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) 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 x-scale (*.f64 b y-scale)) (sqrt.f64 #s(literal 8 binary64)))
(*.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) x-scale) b)
(*.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 x-scale (*.f64 (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 (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 1 binary64) (*.f64 x-scale x-scale)) (+.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 b b) (+.f64 #s(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 x-scale x-scale)) (+.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 b b) (+.f64 #s(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 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) #s(literal -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 (*.f64 b b) (*.f64 a a)) (+.f64 b a)) (-.f64 b 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))))) #s(literal 4 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 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 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 -1/2 binary64) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (+.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 b b) (+.f64 #s(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 x-scale x-scale)) (+.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 b b) (+.f64 #s(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 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) #s(literal -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 (*.f64 b b) (*.f64 a a)) (+.f64 b a)) (-.f64 b 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))))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))))))))
(*.f64 (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) #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 (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 1 binary64) (*.f64 x-scale x-scale)) (+.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 b b) (+.f64 #s(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 x-scale x-scale)) (+.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 b b) (+.f64 #s(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 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) #s(literal -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 (*.f64 b b) (*.f64 a a)) (+.f64 b a)) (-.f64 b 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))))) #s(literal 4 binary64))) (*.f64 x-scale x-scale))))))))
(*.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 (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 1 binary64) (*.f64 x-scale x-scale)) (+.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 b b) (+.f64 #s(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 x-scale x-scale)) (+.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 b b) (+.f64 #s(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 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) #s(literal -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 (*.f64 b b) (*.f64 a a)) (+.f64 b a)) (-.f64 b 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))))) #s(literal 4 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 x-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 1/4 binary64))))
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 (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 (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 1 binary64) (*.f64 x-scale x-scale)) (+.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 b b) (+.f64 #s(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 x-scale x-scale)) (+.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 b b) (+.f64 #s(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 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) #s(literal -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 (*.f64 b b) (*.f64 a a)) (+.f64 b a)) (-.f64 b 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))))) #s(literal 4 binary64))) (*.f64 x-scale x-scale)))))))))
(*.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 (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 1 binary64) (*.f64 x-scale x-scale)) (+.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 b b) (+.f64 #s(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 x-scale x-scale)) (+.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 b b) (+.f64 #s(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 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) #s(literal -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 (*.f64 b b) (*.f64 a a)) (+.f64 b a)) (-.f64 b 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))))) #s(literal 4 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 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 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 -1/2 binary64) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (+.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 b b) (+.f64 #s(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 x-scale x-scale)) (+.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 b b) (+.f64 #s(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 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) #s(literal -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 (*.f64 b b) (*.f64 a a)) (+.f64 b a)) (-.f64 b 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))))) #s(literal 4 binary64))) (*.f64 x-scale x-scale))))))) (*.f64 x-scale (sqrt.f64 #s(literal 8 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 (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 1 binary64) (*.f64 x-scale x-scale)) (+.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 b b) (+.f64 #s(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 x-scale x-scale)) (+.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 b b) (+.f64 #s(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 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) #s(literal -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 (*.f64 b b) (*.f64 a a)) (+.f64 b a)) (-.f64 b 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))))) #s(literal 4 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 x-scale #s(literal 1/4 binary64)))
(*.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 (pow.f64 #s(literal 8 binary64) #s(literal 1/4 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/4 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))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64))))
(*.f64 a (*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64)))
(*.f64 (*.f64 a a) (*.f64 (*.f64 b b) #s(literal 4 binary64)))
(*.f64 b (*.f64 (*.f64 a (*.f64 a b)) #s(literal 4 binary64)))
(*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 a (*.f64 a b))))
(*.f64 (*.f64 a b) (*.f64 (*.f64 a b) #s(literal 4 binary64)))
(*.f64 (*.f64 a (*.f64 b b)) (*.f64 a #s(literal 4 binary64)))
(*.f64 (*.f64 a (*.f64 a b)) (*.f64 b #s(literal 4 binary64)))
(*.f64 (*.f64 b (*.f64 a (*.f64 a b))) #s(literal 4 binary64))
(*.f64 (*.f64 #s(literal 4 binary64) a) (*.f64 a (*.f64 b b)))
(*.f64 (*.f64 #s(literal 4 binary64) b) (*.f64 a (*.f64 a b)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a b)) (*.f64 a b))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) a)
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))) b)
(*.f64 (*.f64 (*.f64 #s(literal 4 binary64) a) b) (*.f64 a b))
(*.f64 (*.f64 (*.f64 #s(literal 4 binary64) a) (*.f64 b b)) a)
(*.f64 (*.f64 (*.f64 #s(literal 4 binary64) a) (*.f64 a b)) b)
(*.f64 (*.f64 (*.f64 a a) #s(literal 4 binary64)) (*.f64 b b))
(*.f64 (*.f64 (*.f64 a a) (*.f64 b (*.f64 b (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 a) #s(literal 2 binary64)))
(pow.f64 a #s(literal 2 binary64))
(*.f64 a a)
(*.f64 (pow.f64 a #s(literal 1 binary64)) (pow.f64 a #s(literal 1 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)))
(-.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 #s(literal 1 binary64) (PI.f64))
(*.f64 (cbrt.f64 (PI.f64)) (cbrt.f64 (*.f64 (PI.f64) (PI.f64))))
(*.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (cbrt.f64 (PI.f64)))
(*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)))
(*.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) #s(literal 1 binary64)) (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1 binary64)))
(*.f64 (*.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)))
(+.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (fma.f64 (neg.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/180 binary64))))) (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/180 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 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (-.f64 #s(literal 0 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)))))
(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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))
(fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/180 binary64)))) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/180 binary64)))) (-.f64 #s(literal 0 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 (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 3 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 3 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 #s(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 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/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/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 (*.f64 (+.f64 #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 #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 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/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/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 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/180 binary64))))) (-.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/180 binary64)))) (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/180 binary64))))))
(sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/180 binary64)))) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/180 binary64))))))
(*.f64 (*.f64 #s(literal 2 binary64) (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/180 binary64))))) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/180 binary64)))))
(exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/180 binary64))))) #s(literal 1 binary64)))
(cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/180 binary64))))
(pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/180 binary64)))) #s(literal 1 binary64))
(*.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/180 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/180 binary64)))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/180 binary64))))) #s(literal 1 binary64)))
(sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/180 binary64))))
(pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/180 binary64)))) #s(literal 1 binary64))
(*.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/180 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/180 binary64)))) #s(literal 1/2 binary64)))

simplify2.2s (3.3%)

Algorithm
egg-herbie
Rules
7378×*-lowering-*.f32
7378×*-lowering-*.f64
2978×+-lowering-+.f64
2978×+-lowering-+.f32
2358×/-lowering-/.f32
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
02334162443
17270162251
08115162251
Stop Event
iter limit
node limit
Counts
672 → 672
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/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)))))
(* 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)))))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(/ (* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8)))) (* x-scale (pow y-scale 2)))
(* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))
(* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))
(* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))
(* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))
(* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))
(* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))
(* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))
(* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))
(* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))
(* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))
(* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))
(* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))
(* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))
(* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))
(* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))
(* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))
(* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))
(* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))
(* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))
(* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))
(* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))
(* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))
(* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))
(* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))
(pow a 3)
(pow a 3)
(pow a 3)
(pow a 3)
(pow a 3)
(pow a 3)
(pow a 3)
(pow a 3)
(pow a 3)
(pow a 3)
(pow a 3)
(pow a 3)
(* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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) (* (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))) (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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) (* (sqrt -1) (+ (* 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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) (* (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))) (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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) (* (sqrt -1) (+ (* -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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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) (* (sqrt -1) (+ (* 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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) (* (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))) (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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) (* (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))) (* 1/2 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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) (* (sqrt -1) (+ (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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) (* (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))) (* 1/2 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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) (* (sqrt -1) (+ (* -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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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) (* (sqrt -1) (+ (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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) (* (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))) (* 1/2 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (* 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 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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))))) (/ (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (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)))))) (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 (+ (/ (* (pow (sin (* 1/90 (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))))
(* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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/2 (* (/ (* (pow a 2) (* (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 2) (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* (/ (* (pow a 2) (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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/2 (* (/ (* (pow a 2) (* (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (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 x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* (/ (* (pow a 2) (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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/2 (* (/ (* (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 x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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/2 (* (/ (* (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 x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow a 2) (* (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 2) (* (pow b 3) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))
(* (pow b 3) (+ (* 1/2 (* (/ (* (pow a 2) (* (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (* (/ (* (pow a 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))))
(* (pow b 3) (+ (* -1/2 (* (/ (* (pow a 2) (* (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (/ (* (pow a 2) (* (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (* (/ (* (pow a 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))))
(* (pow b 3) (+ (* -1/2 (* (/ (* (pow a 2) (* (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (/ (* (pow a 2) (* (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (/ (* (pow a 2) (* (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (* (/ (* (pow a 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (/ (* (pow a 2) (* (pow b 3) (* (sqrt -8) (sqrt -1)))) (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (pow b 3) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt -8) (* (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))) (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (* (/ (* (pow a 2) (* (sqrt -8) (sqrt -1))) (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (pow b 3) (+ (* -1/2 (* (/ (* (pow a 2) (* (sqrt -8) (* (sqrt -1) (+ (* 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (/ (* (pow a 2) (* (sqrt -8) (* (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))) (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (* (/ (* (pow a 2) (* (sqrt -8) (sqrt -1))) (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (pow b 3) (+ (* -1/2 (* (/ (* (pow a 2) (* (sqrt -8) (* (sqrt -1) (+ (* -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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (/ (* (pow a 2) (* (sqrt -8) (* (sqrt -1) (+ (* 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (/ (* (pow a 2) (* (sqrt -8) (* (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))) (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (* (/ (* (pow a 2) (* (sqrt -8) (sqrt -1))) (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))))))
(* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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/2 (* (/ (* (pow a 2) (* (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 y-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 2) (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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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) (+ (* (/ (* (pow b 2) (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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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/2 (* (/ (* (pow a 2) (* (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 y-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (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 y-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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) (+ (* (/ (* (pow b 2) (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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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/2 (* (/ (* (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 y-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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/2 (* (/ (* (pow a 2) (* (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 y-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (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 y-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 3) (* (pow b 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))
(* (pow a 3) (+ (* 1/2 (* (/ (* (pow b 2) (* (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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (* (/ (* (pow b 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))))
(* (pow a 3) (+ (* -1/2 (* (/ (* (pow b 2) (* (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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (/ (* (pow b 2) (* (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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (* (/ (* (pow b 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))))
(* (pow a 3) (+ (* -1/2 (* (/ (* (pow b 2) (* (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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (/ (* (pow b 2) (* (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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (/ (* (pow b 2) (* (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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (* (/ (* (pow b 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (/ (* (pow a 3) (* (pow b 2) (* (sqrt -8) (sqrt -1)))) (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (pow a 3) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt -8) (* (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))) (* 1/2 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (* (/ (* (pow b 2) (* (sqrt -8) (sqrt -1))) (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (pow a 3) (+ (* -1/2 (* (/ (* (pow b 2) (* (sqrt -8) (* (sqrt -1) (+ (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (/ (* (pow b 2) (* (sqrt -8) (* (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))) (* 1/2 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (* (/ (* (pow b 2) (* (sqrt -8) (sqrt -1))) (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (pow a 3) (+ (* -1/2 (* (/ (* (pow b 2) (* (sqrt -8) (* (sqrt -1) (+ (* -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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (/ (* (pow b 2) (* (sqrt -8) (* (sqrt -1) (+ (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (/ (* (pow b 2) (* (sqrt -8) (* (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))) (* 1/2 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (* (/ (* (pow b 2) (* (sqrt -8) (sqrt -1))) (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))))))
(* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)
(/ (+ (* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)
(/ (+ (* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/4 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)
(* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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/2 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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/2 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))
(* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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/2 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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/2 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))
(* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)
(/ (+ (* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)
(/ (+ (* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/4 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)
(* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))
(* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))
(/ (* (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))) (+ (* 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 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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) (- (+ (* -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 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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))))) (/ (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (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)))))) (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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))) (+ (* 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 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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))))))
(* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow (sin (* 1/90 (* 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))))))
(* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow (sin (* 1/90 (* 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))))))
(* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow (sin (* 1/90 (* 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))))))
(* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow (sin (* 1/90 (* 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))))))
(* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow (sin (* 1/90 (* 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))))))
(* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow (sin (* 1/90 (* 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))))))
(* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow (sin (* 1/90 (* 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))))))
(sqrt (* a b))
(sqrt (* a b))
(sqrt (* a b))
(sqrt (* a b))
(sqrt (* a b))
(sqrt (* a b))
(sqrt (* a b))
(sqrt (* a b))
(* -1 (* (sqrt (* a b)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (* a b)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (* a b)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (* a b)) (pow (sqrt -1) 2)))
(sqrt (* a b))
(sqrt (* a b))
(sqrt (* a b))
(sqrt (* a b))
(sqrt (* a b))
(sqrt (* a b))
(sqrt (* a b))
(sqrt (* a b))
(* -1 (* (sqrt (* a b)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (* a b)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (* a b)) (pow (sqrt -1) 2)))
(* -1 (* (sqrt (* a b)) (pow (sqrt -1) 2)))
(* a b)
(* a b)
(* a b)
(* a b)
(* a b)
(* a b)
(* a b)
(* a b)
(* a b)
(* a b)
(* a b)
(* a b)
(* a b)
(* a b)
(* a b)
(* a b)
(* a b)
(* a b)
(* a b)
(* a b)
(* a b)
(* a b)
(* a b)
(* a b)
(* 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))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
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/90 (* angle (PI)))
(* angle (+ (* -1/4374000 (* (pow angle 2) (pow (PI) 3))) (* 1/90 (PI))))
(* angle (+ (* 1/90 (PI)) (* (pow angle 2) (+ (* -1/4374000 (pow (PI) 3)) (* 1/708588000000 (* (pow angle 2) (pow (PI) 5)))))))
(* angle (+ (* 1/90 (PI)) (* (pow angle 2) (+ (* -1/4374000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/241061637600000000 (* (pow angle 2) (pow (PI) 7))) (* 1/708588000000 (pow (PI) 5))))))))
(sin (* 1/90 (* angle (PI))))
(sin (* 1/90 (* angle (PI))))
(sin (* 1/90 (* angle (PI))))
(sin (* 1/90 (* angle (PI))))
(sin (* 1/90 (* angle (PI))))
(sin (* 1/90 (* angle (PI))))
(sin (* 1/90 (* angle (PI))))
(sin (* 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))))
Outputs
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(*.f64 a (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(*.f64 a (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(*.f64 a (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(*.f64 a (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(*.f64 a (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(*.f64 a (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(*.f64 a (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(*.f64 a (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(*.f64 a (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(*.f64 a (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(*.f64 a (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(*.f64 a (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(*.f64 a (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(*.f64 a (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(*.f64 a (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(*.f64 a (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(*.f64 a (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(*.f64 a (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(*.f64 a (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(*.f64 a (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(*.f64 a (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(*.f64 a (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(*.f64 a (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* a (* x-scale (* (sqrt 2) (sqrt 8))))
(*.f64 a (*.f64 (*.f64 x-scale (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/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 binary64))))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))
(*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))
(*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))
(*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))
(*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))
(*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))
(*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))
(*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))
(*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))
(*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))
(*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))
(*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))
(*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))
(*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))
(*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))
(*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))
(*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))
(*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))
(*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))
(*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))
(*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))
(*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))
(*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))
(*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(* (pow a 3) (* (pow b 2) (* (sqrt 2) (sqrt 8))))
(*.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64))))
(pow a 3)
(*.f64 a (*.f64 a a))
(pow a 3)
(*.f64 a (*.f64 a a))
(pow a 3)
(*.f64 a (*.f64 a a))
(pow a 3)
(*.f64 a (*.f64 a a))
(pow a 3)
(*.f64 a (*.f64 a a))
(pow a 3)
(*.f64 a (*.f64 a a))
(pow a 3)
(*.f64 a (*.f64 a a))
(pow a 3)
(*.f64 a (*.f64 a a))
(pow a 3)
(*.f64 a (*.f64 a a))
(pow a 3)
(*.f64 a (*.f64 a a))
(pow a 3)
(*.f64 a (*.f64 a a))
(pow a 3)
(*.f64 a (*.f64 a a))
(* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.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 x-scale x-scale)) (-.f64 (+.f64 (/.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (*.f64 #s(literal 1/4 binary64) 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))))))
(* 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))))))))
(* 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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/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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))))))) (pow.f64 b #s(literal 4 binary64))))))
(* 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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/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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))))))) (pow.f64 b #s(literal 4 binary64))))) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))))))) (pow.f64 b #s(literal 6 binary64))))))
(* -1/4 (* (* b (* x-scale (* y-scale (* (sqrt -8) (sqrt -1))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal -8 binary64))) (sqrt.f64 #s(literal -1 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))))))
(* -1 (* b (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt -8) (* (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))) (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (*.f64 x-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal -8 binary64)) (sqrt.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))) (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 b b))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal -8 binary64))) (sqrt.f64 #s(literal -1 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))))))))
(* -1 (* b (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt -8) (* (sqrt -1) (+ (* 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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) (* (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))) (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))))))
(neg.f64 (*.f64 b (+.f64 (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal -8 binary64)) (sqrt.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))) (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 b b))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal -8 binary64))) (sqrt.f64 #s(literal -1 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal -8 binary64)) (sqrt.f64 #s(literal -1 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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))))))) (pow.f64 b #s(literal 4 binary64)))))))
(* -1 (* b (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt -8) (* (sqrt -1) (+ (* -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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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) (* (sqrt -1) (+ (* 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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) (* (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))) (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal -8 binary64)) (sqrt.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))) (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 b b))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal -8 binary64))) (sqrt.f64 #s(literal -1 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal -8 binary64)) (sqrt.f64 #s(literal -1 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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))))))) (pow.f64 b #s(literal 4 binary64))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal -8 binary64)) (sqrt.f64 #s(literal -1 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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))))))) (pow.f64 b #s(literal 6 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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (*.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 x-scale x-scale)) (-.f64 (+.f64 (/.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 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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) x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 #s(literal -1/2 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))))))))
(* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 #s(literal -1/2 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))))))))))
(* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (*.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 #s(literal -1/2 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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/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 #s(literal -1/2 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))))))))) (pow.f64 a #s(literal 4 binary64))))))
(* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+.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 #s(literal -1/2 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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/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 #s(literal -1/2 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))))))))) (pow.f64 a #s(literal 4 binary64))))) (*.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 #s(literal -1/2 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 #s(literal -1/2 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))))))))) (pow.f64 a #s(literal 6 binary64))))))
(* -1/4 (* (* a (* x-scale (* y-scale (* (sqrt -8) (sqrt -1))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal -8 binary64))) (sqrt.f64 #s(literal -1 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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))))))))
(* -1 (* a (+ (* 1/8 (* (/ (* x-scale (* y-scale (* (sqrt -8) (* (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))) (* 1/2 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (*.f64 x-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal -8 binary64)) (sqrt.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))) (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 a a))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal -8 binary64))) (sqrt.f64 #s(literal -1 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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))))))))))
(* -1 (* a (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt -8) (* (sqrt -1) (+ (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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) (* (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))) (* 1/2 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal -8 binary64)) (sqrt.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))) (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 a a))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal -8 binary64))) (sqrt.f64 #s(literal -1 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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal -8 binary64)) (sqrt.f64 #s(literal -1 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 #s(literal -1/2 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))))))))) (pow.f64 a #s(literal 4 binary64))))))
(* -1 (* a (+ (* -1/8 (* (/ (* x-scale (* y-scale (* (sqrt -8) (* (sqrt -1) (+ (* -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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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) (* (sqrt -1) (+ (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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) (* (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))) (* 1/2 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal -8 binary64)) (sqrt.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))) (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 a a))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal -8 binary64))) (sqrt.f64 #s(literal -1 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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal -8 binary64)) (sqrt.f64 #s(literal -1 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 #s(literal -1/2 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))))))))) (pow.f64 a #s(literal 4 binary64))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (sqrt.f64 #s(literal -8 binary64)) (sqrt.f64 #s(literal -1 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 #s(literal -1/2 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 #s(literal -1/2 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))))))))) (pow.f64 a #s(literal 6 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 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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))))))))))))))
(* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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/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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)))))))
(+ (* -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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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/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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)))))
(+ (* -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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (*.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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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/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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 #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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)))))
(* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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/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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)))))))
(+ (* -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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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/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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)))))
(+ (* -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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (*.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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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/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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 #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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)))))
(* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 #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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 #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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 #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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)))))))
(+ (* -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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)))))
(+ (* -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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (+.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)))))
(* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)))))))
(+ (* -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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)))))
(+ (* -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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (+.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (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/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 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 (*.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 (*.f64 b b) (*.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 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.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)))))
(+ (* 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 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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) a) (*.f64 (*.f64 x-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 x-scale (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.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 (*.f64 b b) (*.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 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.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 (*.f64 a a) (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 #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 (*.f64 b b) (*.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 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.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 (*.f64 #s(literal -1/196830000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 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 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (*.f64 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 #s(literal 1/3149280000 binary64) (/.f64 (*.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 (/.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 (*.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 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.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 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.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 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.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 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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))))) (/ (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (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)))))) (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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) a) (*.f64 (*.f64 x-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 x-scale (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.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 (*.f64 b b) (*.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 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.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 (*.f64 a a) (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 #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 (*.f64 b b) (*.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 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.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 (*.f64 #s(literal -1/196830000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 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 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (*.f64 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 #s(literal 1/3149280000 binary64) (/.f64 (*.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 (/.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 (*.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 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.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 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.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 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.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 (*.f64 #s(literal -1/765275040000000 binary64) (*.f64 (*.f64 a a) (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 #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 (*.f64 b b) (*.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 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.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 (*.f64 a a) (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 #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 (*.f64 b b) (*.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 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.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 (*.f64 #s(literal -1/196830000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 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 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (*.f64 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 #s(literal 1/3149280000 binary64) (/.f64 (*.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 (/.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 (*.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 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.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 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.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 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.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 (*.f64 #s(literal 2 binary64) (+.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 (*.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 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (*.f64 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 #s(literal 1/3149280000 binary64) (/.f64 (*.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 (*.f64 #s(literal -1/765275040000000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/765275040000000 binary64) (*.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 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/11957422500000 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.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 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.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 #s(literal -1/196830000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 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 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (*.f64 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 #s(literal 1/3149280000 binary64) (/.f64 (*.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 (/.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 (*.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 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.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 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.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 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.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 (+ (/ (* (pow (sin (* 1/90 (* 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (+ (/ (* (pow (sin (* 1/90 (* 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (+ (/ (* (pow (sin (* 1/90 (* 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (+ (/ (* (pow (sin (* 1/90 (* 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (+ (/ (* (pow (sin (* 1/90 (* 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (+ (/ (* (pow (sin (* 1/90 (* 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (+ (/ (* (pow (sin (* 1/90 (* 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (+ (/ (* (pow (sin (* 1/90 (* 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))))))
(* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a a) (/.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (*.f64 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))))))
(* (pow b 2) (+ (* 1/2 (* (/ (* (pow a 2) (* (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 2) (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 b b) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 a a) x-scale) (/.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 a a) (+.f64 #s(literal 1/2 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))))))))
(* (pow b 2) (+ (* (/ (* (pow a 2) (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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/2 (* (/ (* (pow a 2) (* (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (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 x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 b b) (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.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 a a) (+.f64 #s(literal 1/2 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))))))
(* (pow b 2) (+ (* (/ (* (pow a 2) (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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/2 (* (/ (* (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 x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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/2 (* (/ (* (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 x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow a 2) (* (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 b b) (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.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 a a) (+.f64 #s(literal 1/2 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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/2 binary64) (+.f64 (/.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 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 a a) (*.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 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))))))))
(* (/ (* (pow a 2) (* (pow b 3) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (*.f64 (*.f64 a a) (*.f64 (*.f64 b (*.f64 b 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))))))
(* (pow b 3) (+ (* 1/2 (* (/ (* (pow a 2) (* (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (* (/ (* (pow a 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 b (*.f64 b b)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 b b) x-scale) y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (sqrt.f64 #s(literal 8 binary64)) 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))))))))
(* (pow b 3) (+ (* -1/2 (* (/ (* (pow a 2) (* (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (/ (* (pow a 2) (* (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (* (/ (* (pow a 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 b (*.f64 b b)) (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 b b) x-scale) y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (sqrt.f64 #s(literal 8 binary64)) 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.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 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale y-scale))))))
(* (pow b 3) (+ (* -1/2 (* (/ (* (pow a 2) (* (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (/ (* (pow a 2) (* (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (/ (* (pow a 2) (* (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (* (/ (* (pow a 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 b (*.f64 b b)) (+.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 b b) x-scale) y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (sqrt.f64 #s(literal 8 binary64)) 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.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 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 6 binary64)) (*.f64 x-scale y-scale))))))
(* -1 (* (/ (* (pow a 2) (* (pow b 3) (* (sqrt -8) (sqrt -1)))) (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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) (*.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 b (*.f64 b b)) (*.f64 (sqrt.f64 #s(literal -8 binary64)) (sqrt.f64 #s(literal -1 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))))))
(* -1 (* (pow b 3) (+ (* 1/2 (* (/ (* (pow a 2) (* (sqrt -8) (* (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))) (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (* (/ (* (pow a 2) (* (sqrt -8) (sqrt -1))) (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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) (*.f64 b (*.f64 b b))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (sqrt.f64 #s(literal -8 binary64)) (sqrt.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))) (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 b b) x-scale) y-scale))) (*.f64 (*.f64 (*.f64 a a) (/.f64 (*.f64 (sqrt.f64 #s(literal -8 binary64)) (sqrt.f64 #s(literal -1 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))))))))
(* -1 (* (pow b 3) (+ (* -1/2 (* (/ (* (pow a 2) (* (sqrt -8) (* (sqrt -1) (+ (* 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (/ (* (pow a 2) (* (sqrt -8) (* (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))) (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (* (/ (* (pow a 2) (* (sqrt -8) (sqrt -1))) (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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) (*.f64 b (*.f64 b b))) (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (sqrt.f64 #s(literal -8 binary64)) (sqrt.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))) (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 b b) x-scale) y-scale))) (*.f64 (*.f64 (*.f64 a a) (/.f64 (*.f64 (sqrt.f64 #s(literal -8 binary64)) (sqrt.f64 #s(literal -1 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (sqrt.f64 #s(literal -8 binary64)) (sqrt.f64 #s(literal -1 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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale y-scale))))))
(* -1 (* (pow b 3) (+ (* -1/2 (* (/ (* (pow a 2) (* (sqrt -8) (* (sqrt -1) (+ (* -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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (/ (* (pow a 2) (* (sqrt -8) (* (sqrt -1) (+ (* 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (/ (* (pow a 2) (* (sqrt -8) (* (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))) (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (* (/ (* (pow a 2) (* (sqrt -8) (sqrt -1))) (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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) (*.f64 b (*.f64 b b))) (+.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (sqrt.f64 #s(literal -8 binary64)) (sqrt.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))) (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 b b) x-scale) y-scale))) (*.f64 (*.f64 (*.f64 a a) (/.f64 (*.f64 (sqrt.f64 #s(literal -8 binary64)) (sqrt.f64 #s(literal -1 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (sqrt.f64 #s(literal -8 binary64)) (sqrt.f64 #s(literal -1 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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (sqrt.f64 #s(literal -8 binary64)) (sqrt.f64 #s(literal -1 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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 6 binary64)) (*.f64 x-scale y-scale))))))
(* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 a a) (/.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (*.f64 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 a 2) (+ (* 1/2 (* (/ (* (pow a 2) (* (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 y-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 2) (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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 a a) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 b b) (sqrt.f64 #s(literal 8 binary64))) (*.f64 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 a 2) (+ (* (/ (* (pow b 2) (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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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/2 (* (/ (* (pow a 2) (* (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 y-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (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 y-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 a a) (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (*.f64 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 x-scale y-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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 a 2) (+ (* (/ (* (pow b 2) (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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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/2 (* (/ (* (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 y-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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/2 (* (/ (* (pow a 2) (* (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 y-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (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 y-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 a a) (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (*.f64 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 x-scale y-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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.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 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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)))))))))
(* (/ (* (pow a 3) (* (pow b 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b 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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))))))))
(* (pow a 3) (+ (* 1/2 (* (/ (* (pow b 2) (* (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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (* (/ (* (pow b 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 a (*.f64 a a)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) (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 #s(literal -1/2 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 a a) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (*.f64 (*.f64 b 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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))))))))))
(* (pow a 3) (+ (* -1/2 (* (/ (* (pow b 2) (* (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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (/ (* (pow b 2) (* (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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (* (/ (* (pow b 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 a (*.f64 a a)) (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) (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 #s(literal -1/2 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 a a) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (*.f64 (*.f64 b 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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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/2 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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale y-scale))))))
(* (pow a 3) (+ (* -1/2 (* (/ (* (pow b 2) (* (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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (/ (* (pow b 2) (* (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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (/ (* (pow b 2) (* (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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (* (/ (* (pow b 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 a (*.f64 a a)) (+.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) (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 #s(literal -1/2 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 a a) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (*.f64 (*.f64 b 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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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/2 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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 b b) (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 #s(literal -1/2 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 #s(literal -1/2 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 6 binary64)) (*.f64 x-scale y-scale))))))
(* -1 (* (/ (* (pow a 3) (* (pow b 2) (* (sqrt -8) (sqrt -1)))) (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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) (*.f64 (*.f64 a (*.f64 a a)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal -8 binary64)) (sqrt.f64 #s(literal -1 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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))))))))
(* -1 (* (pow a 3) (+ (* 1/2 (* (/ (* (pow b 2) (* (sqrt -8) (* (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))) (* 1/2 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (* (/ (* (pow b 2) (* (sqrt -8) (sqrt -1))) (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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) (*.f64 a (*.f64 a a))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (sqrt.f64 #s(literal -8 binary64)) (sqrt.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))) (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 a a) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal -8 binary64)) (sqrt.f64 #s(literal -1 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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))))))))))
(* -1 (* (pow a 3) (+ (* -1/2 (* (/ (* (pow b 2) (* (sqrt -8) (* (sqrt -1) (+ (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (/ (* (pow b 2) (* (sqrt -8) (* (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))) (* 1/2 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (* (/ (* (pow b 2) (* (sqrt -8) (sqrt -1))) (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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) (*.f64 a (*.f64 a a))) (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (sqrt.f64 #s(literal -8 binary64)) (sqrt.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))) (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 a a) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal -8 binary64)) (sqrt.f64 #s(literal -1 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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (sqrt.f64 #s(literal -8 binary64)) (sqrt.f64 #s(literal -1 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 #s(literal -1/2 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale y-scale))))))
(* -1 (* (pow a 3) (+ (* -1/2 (* (/ (* (pow b 2) (* (sqrt -8) (* (sqrt -1) (+ (* -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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (/ (* (pow b 2) (* (sqrt -8) (* (sqrt -1) (+ (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (/ (* (pow b 2) (* (sqrt -8) (* (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))) (* 1/2 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (* (/ (* (pow b 2) (* (sqrt -8) (sqrt -1))) (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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) (*.f64 a (*.f64 a a))) (+.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (sqrt.f64 #s(literal -8 binary64)) (sqrt.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))) (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 a a) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (*.f64 (sqrt.f64 #s(literal -8 binary64)) (sqrt.f64 #s(literal -1 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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (sqrt.f64 #s(literal -8 binary64)) (sqrt.f64 #s(literal -1 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 #s(literal -1/2 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale y-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (sqrt.f64 #s(literal -8 binary64)) (sqrt.f64 #s(literal -1 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 #s(literal -1/2 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 #s(literal -1/2 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (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) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a a) (/.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (*.f64 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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)
(/ (+ (* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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/2 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 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (+.f64 (*.f64 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) (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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)
(/ (+ (* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/4 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) (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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) (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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)
(* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 a a) (*.f64 (*.f64 b b) (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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) (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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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/2 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) (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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) (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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 x-scale x-scale))
(/ (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) (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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) (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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) (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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 #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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 x-scale x-scale))
(* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 a a) (*.f64 (*.f64 b b) (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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) (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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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/2 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) (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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) (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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 x-scale x-scale))
(/ (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) (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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) (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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) (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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 #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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 x-scale x-scale))
(* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a a) (/.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (*.f64 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)
(/ (+ (* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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/2 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 (/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 #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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)
(/ (+ (* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/4 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 #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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 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 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 #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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)
(* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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/2 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 y-scale y-scale))
(/ (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 y-scale y-scale))
(* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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/2 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 y-scale y-scale))
(/ (+ (* -1/2 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (* (/ (* (pow a 2) (* (pow b 2) (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 y-scale y-scale))
(/ (* (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 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 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 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 a (*.f64 angle angle)) (*.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.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 (*.f64 b b) (*.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 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.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 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))) (+ (* 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 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (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/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a (*.f64 angle angle)) (*.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (-.f64 (+.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.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 #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 (*.f64 b b) (*.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 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.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 (*.f64 #s(literal -1/196830000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 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 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (*.f64 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 #s(literal 1/3149280000 binary64) (/.f64 (*.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 (/.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 (*.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 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.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 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.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 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.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 x-scale (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.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 (*.f64 b b) (*.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 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.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 x-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) (- (+ (* -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 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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))))) (/ (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (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)))))) (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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))) (+ (* 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 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 (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/2 binary64) (*.f64 a (*.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (+.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 (*.f64 b b) (*.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 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.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 x-scale (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 a (*.f64 angle angle)) (*.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (+.f64 (/.f64 (*.f64 #s(literal -1/765275040000000 binary64) (*.f64 (*.f64 a a) (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 #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 (*.f64 b b) (*.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 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.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 (*.f64 a a) (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 #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 (*.f64 b b) (*.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 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.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 (*.f64 #s(literal -1/196830000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 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 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (*.f64 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 #s(literal 1/3149280000 binary64) (/.f64 (*.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 (/.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 (*.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 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.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 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.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 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.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 (*.f64 #s(literal 2 binary64) (+.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 (*.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 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (*.f64 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 #s(literal 1/3149280000 binary64) (/.f64 (*.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 (*.f64 #s(literal -1/765275040000000 binary64) (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 1/765275040000000 binary64) (*.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 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/11957422500000 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.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 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.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 #s(literal -1/196830000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 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 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (*.f64 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 #s(literal 1/3149280000 binary64) (/.f64 (*.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 (/.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 (*.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 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.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 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.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 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.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 x-scale (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (-.f64 (+.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.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 #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 (*.f64 b b) (*.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 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.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 (*.f64 #s(literal -1/196830000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 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 #s(literal 2 binary64) (*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (*.f64 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 #s(literal 1/3149280000 binary64) (/.f64 (*.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 (/.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 (*.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 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.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 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.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 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (+.f64 (/.f64 (*.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 x-scale (sqrt.f64 #s(literal 2 binary64))))))))))
(* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow (sin (* 1/90 (* 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 (*.f64 a a) (/.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (*.f64 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))))))
(* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow (sin (* 1/90 (* 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 (*.f64 a a) (/.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (*.f64 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))))))
(* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow (sin (* 1/90 (* 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 (*.f64 a a) (/.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (*.f64 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))))))
(* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow (sin (* 1/90 (* 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 (*.f64 a a) (/.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (*.f64 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))))))
(* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow (sin (* 1/90 (* 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 (*.f64 a a) (/.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (*.f64 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))))))
(* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow (sin (* 1/90 (* 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 (*.f64 a a) (/.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (*.f64 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))))))
(* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow (sin (* 1/90 (* 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 (*.f64 a a) (/.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (*.f64 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))))))
(* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow (sin (* 1/90 (* 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 (*.f64 a a) (/.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (*.f64 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 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))))))
(sqrt (* a b))
(sqrt.f64 (*.f64 a b))
(sqrt (* a b))
(sqrt.f64 (*.f64 a b))
(sqrt (* a b))
(sqrt.f64 (*.f64 a b))
(sqrt (* a b))
(sqrt.f64 (*.f64 a b))
(sqrt (* a b))
(sqrt.f64 (*.f64 a b))
(sqrt (* a b))
(sqrt.f64 (*.f64 a b))
(sqrt (* a b))
(sqrt.f64 (*.f64 a b))
(sqrt (* a b))
(sqrt.f64 (*.f64 a b))
(* -1 (* (sqrt (* a b)) (pow (sqrt -1) 2)))
(neg.f64 (*.f64 (sqrt.f64 (*.f64 a b)) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))))
(* -1 (* (sqrt (* a b)) (pow (sqrt -1) 2)))
(neg.f64 (*.f64 (sqrt.f64 (*.f64 a b)) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))))
(* -1 (* (sqrt (* a b)) (pow (sqrt -1) 2)))
(neg.f64 (*.f64 (sqrt.f64 (*.f64 a b)) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))))
(* -1 (* (sqrt (* a b)) (pow (sqrt -1) 2)))
(neg.f64 (*.f64 (sqrt.f64 (*.f64 a b)) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))))
(sqrt (* a b))
(sqrt.f64 (*.f64 a b))
(sqrt (* a b))
(sqrt.f64 (*.f64 a b))
(sqrt (* a b))
(sqrt.f64 (*.f64 a b))
(sqrt (* a b))
(sqrt.f64 (*.f64 a b))
(sqrt (* a b))
(sqrt.f64 (*.f64 a b))
(sqrt (* a b))
(sqrt.f64 (*.f64 a b))
(sqrt (* a b))
(sqrt.f64 (*.f64 a b))
(sqrt (* a b))
(sqrt.f64 (*.f64 a b))
(* -1 (* (sqrt (* a b)) (pow (sqrt -1) 2)))
(neg.f64 (*.f64 (sqrt.f64 (*.f64 a b)) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))))
(* -1 (* (sqrt (* a b)) (pow (sqrt -1) 2)))
(neg.f64 (*.f64 (sqrt.f64 (*.f64 a b)) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))))
(* -1 (* (sqrt (* a b)) (pow (sqrt -1) 2)))
(neg.f64 (*.f64 (sqrt.f64 (*.f64 a b)) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))))
(* -1 (* (sqrt (* a b)) (pow (sqrt -1) 2)))
(neg.f64 (*.f64 (sqrt.f64 (*.f64 a b)) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))))
(* a b)
(*.f64 a b)
(* a b)
(*.f64 a b)
(* a b)
(*.f64 a b)
(* a b)
(*.f64 a b)
(* a b)
(*.f64 a b)
(* a b)
(*.f64 a b)
(* a b)
(*.f64 a b)
(* a b)
(*.f64 a b)
(* a b)
(*.f64 a b)
(* a b)
(*.f64 a b)
(* a b)
(*.f64 a b)
(* a b)
(*.f64 a b)
(* a b)
(*.f64 a b)
(* a b)
(*.f64 a b)
(* a b)
(*.f64 a b)
(* a b)
(*.f64 a b)
(* a b)
(*.f64 a b)
(* a b)
(*.f64 a b)
(* a b)
(*.f64 a b)
(* a b)
(*.f64 a b)
(* a b)
(*.f64 a b)
(* a b)
(*.f64 a b)
(* a b)
(*.f64 a b)
(* a b)
(*.f64 a b)
(* 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 (*.f64 #s(literal 1/4 binary64) 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 (*.f64 #s(literal 1/4 binary64) 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 (*.f64 #s(literal 1/4 binary64) 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 (*.f64 #s(literal 1/4 binary64) 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 (*.f64 #s(literal 1/4 binary64) 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 (*.f64 #s(literal 1/4 binary64) 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 (*.f64 #s(literal 1/4 binary64) 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 (*.f64 #s(literal 1/4 binary64) 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 (*.f64 #s(literal 1/4 binary64) 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 (*.f64 #s(literal 1/4 binary64) 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 (*.f64 #s(literal 1/4 binary64) 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 (*.f64 #s(literal 1/4 binary64) 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 (*.f64 #s(literal 1/4 binary64) 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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (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/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 (*.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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (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/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 (+.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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))) (pow.f64 x-scale #s(literal 4 binary64))))) (*.f64 #s(literal -1/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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (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)))))
(* -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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (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 (*.f64 #s(literal 1/4 binary64) 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 #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 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 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 #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 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 #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 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 #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 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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) (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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 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 #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 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 #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 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 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 #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 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 #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 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 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 #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 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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) (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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 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 #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 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 #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 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.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) (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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 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 #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 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 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 #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 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 #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 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (*.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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/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 (*.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (*.f64 #s(literal 1/16 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (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/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 (+.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (*.f64 #s(literal 1/16 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (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 #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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (*.f64 #s(literal 1/16 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (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)))))
(* -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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (*.f64 #s(literal 1/16 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (*.f64 #s(literal 1/16 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (*.f64 #s(literal 1/16 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (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 (*.f64 angle 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 (*.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 #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 (*.f64 #s(literal 1/4 binary64) 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 (*.f64 #s(literal 1/4 binary64) 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 (*.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 #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 (*.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 #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 (*.f64 #s(literal -1/408146688000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal -1/6122200320000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (*.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 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.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 (*.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 #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 (*.f64 #s(literal 1/4 binary64) 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 (*.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 #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 (*.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 #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 (*.f64 #s(literal -1/408146688000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal -1/6122200320000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (*.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 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.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 (*.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 #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 (*.f64 #s(literal -1/2777030065152000000000 binary64) (pow.f64 (PI.f64) #s(literal 8 binary64))) (*.f64 y-scale y-scale)) (/.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 #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 (/.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 #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 (*.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 #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 (*.f64 #s(literal -1/408146688000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal -1/6122200320000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (*.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 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.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 (*.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 #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 (*.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 #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 (*.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 #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 (*.f64 #s(literal -1/408146688000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (pow.f64 x-scale #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal -1/6122200320000000 binary64) (pow.f64 (PI.f64) #s(literal 6 binary64))) (pow.f64 x-scale #s(literal 4 binary64)))) (+.f64 (*.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 #s(literal 1/32400 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (/.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 (*.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 #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 (*.f64 #s(literal 1/4 binary64) 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 (*.f64 #s(literal 1/4 binary64) 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 (*.f64 #s(literal 1/4 binary64) 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 (*.f64 #s(literal 1/4 binary64) 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 (*.f64 #s(literal 1/4 binary64) 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 (*.f64 #s(literal 1/4 binary64) 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 (*.f64 #s(literal 1/4 binary64) 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 (*.f64 #s(literal 1/4 binary64) 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 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* b (* x-scale (* y-scale (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) 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 (*.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 #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 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.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))))))))
(* 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 (*.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 #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 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.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))))))))
(* 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 (*.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 #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 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.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))))))))
(* 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 (*.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 #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 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.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))))))))
(* 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 (*.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 #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 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.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))))))))
(* 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 (*.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 #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 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.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))))))))
(* 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 (*.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 #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 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.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))))))))
(* 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 (*.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 #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 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.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))))))))
(* 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 (*.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 #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 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.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))))))))
(* 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 (*.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 #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 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.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))))))))
(* 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 (*.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 #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 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.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))))))))
(* 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 (*.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 #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 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.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))))))))
(* 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 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 x-scale x-scale) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.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 b b) (pow.f64 (cos.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 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.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 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.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 b b) (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 a a) (*.f64 x-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 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 x-scale x-scale) (/.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 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 (pow.f64 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 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)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.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 b b) (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 b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 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 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 x-scale x-scale) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.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 b b) (pow.f64 (cos.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 x-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 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 x-scale x-scale) (/.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 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 (pow.f64 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 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)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.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 b b) (pow.f64 (cos.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 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)) (/.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 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 x-scale x-scale) (/.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 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 (pow.f64 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 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 (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 x-scale x-scale) (/.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 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 (pow.f64 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 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))))))) #s(literal 2 binary64)) (+.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 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.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 b b) (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 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 x-scale x-scale) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.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 b b) (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 b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* 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 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 x-scale x-scale) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.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 b b) (pow.f64 (cos.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 x-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 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 x-scale x-scale) (/.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 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 (pow.f64 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 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)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.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 b b) (pow.f64 (cos.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 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)) (/.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 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 x-scale x-scale) (/.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 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 (pow.f64 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 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 (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 x-scale x-scale) (/.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 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 (pow.f64 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 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))))))) #s(literal 2 binary64)) (+.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 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.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 b b) (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 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 x-scale x-scale) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.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 b b) (pow.f64 (cos.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 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)) (/.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 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 x-scale x-scale) (/.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 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 (pow.f64 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 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 (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 x-scale x-scale) (/.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 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 (pow.f64 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 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 #s(literal -1/2 binary64) (-.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)) (/.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 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 x-scale x-scale) (/.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 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 (pow.f64 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 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 (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 x-scale x-scale) (/.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 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 (pow.f64 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 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))))))) #s(literal 2 binary64)) (+.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 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.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 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))))) (+.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 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.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 b b) (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 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 x-scale x-scale) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.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 b b) (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 (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 x-scale x-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 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))))))
(* 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 (*.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/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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 #s(literal 1/4 binary64) (*.f64 x-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 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (pow.f64 (sin.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 (*.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/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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (*.f64 #s(literal 1/4 binary64) (*.f64 x-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 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.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 (pow.f64 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 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (*.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/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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (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 x-scale x-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 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 (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 x-scale x-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 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 a #s(literal 4 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 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.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/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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 #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 (pow.f64 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 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (*.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/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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (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 x-scale x-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 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 (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 x-scale x-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 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 a #s(literal 4 binary64)))) (+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-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 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.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 (pow.f64 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 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (*.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/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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.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))) (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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (*.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/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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (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 x-scale x-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 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 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 a #s(literal 6 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 (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 x-scale x-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 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 (* 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 (*.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/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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 #s(literal 1/4 binary64) (*.f64 x-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 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (pow.f64 (sin.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 (*.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/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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (*.f64 #s(literal 1/4 binary64) (*.f64 x-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 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.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 (pow.f64 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 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (*.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/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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (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 x-scale x-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 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 (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 x-scale x-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 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 a #s(literal 4 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 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.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/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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 #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 (pow.f64 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 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (*.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/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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (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 x-scale x-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 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 (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 x-scale x-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 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 a #s(literal 4 binary64)))) (+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-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 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.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 (pow.f64 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 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (*.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/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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.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))) (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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 (*.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/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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (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 x-scale x-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 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 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 a #s(literal 6 binary64))))))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (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/4 binary64) a) (*.f64 (*.f64 x-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 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.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 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.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 (*.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))))) (*.f64 b b))))))))) (*.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)))) (* 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 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-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 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.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 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.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 (*.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))))) (*.f64 b b))))))) (*.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 (*.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))))) (+.f64 (*.f64 (*.f64 a a) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.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 (*.f64 a a) (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 (*.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))))) (+.f64 (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.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 (*.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))))) (*.f64 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 (*.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 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.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 (*.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))))) (*.f64 b b)))))) #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 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-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 (sqrt.f64 #s(literal 8 binary64))) (+.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 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.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 (*.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))))) (*.f64 b b)))))))) (*.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 (*.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))))) (+.f64 (*.f64 (*.f64 a a) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.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 (*.f64 a a) (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 (*.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))))) (+.f64 (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.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 (*.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))))) (*.f64 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 (*.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 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.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 (*.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))))) (*.f64 b b)))))) #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 #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 (*.f64 a a) (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 (/.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (+.f64 (*.f64 (*.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 (/.f64 (*.f64 (*.f64 a a) (*.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 (*.f64 a a) (*.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 (*.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))))) (-.f64 (-.f64 (/.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 (*.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))))) (+.f64 (*.f64 (*.f64 a a) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.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 (*.f64 a a) (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 (*.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))))) (+.f64 (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.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 (*.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))))) (*.f64 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 (*.f64 a a) (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 x-scale x-scale) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.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 (*.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))))) (*.f64 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 (*.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 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.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 (*.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))))) (*.f64 b b)))))) (+.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 (*.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))))) (+.f64 (*.f64 (*.f64 a a) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.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 (*.f64 a a) (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 (*.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))))) (+.f64 (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.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 (*.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))))) (*.f64 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 (*.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 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.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 (*.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))))) (*.f64 b b)))))) #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 (*.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 #s(literal -1/2 binary64) (/.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 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 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.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))))))))
(* 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 (*.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 #s(literal -1/2 binary64) (/.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 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 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.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))))))))
(* 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 (*.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 #s(literal -1/2 binary64) (/.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 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 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.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))))))))
(* 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 (*.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 #s(literal -1/2 binary64) (/.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 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 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.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))))))))
(* 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 (*.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 #s(literal -1/2 binary64) (/.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 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 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.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))))))))
(* 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 (*.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 #s(literal -1/2 binary64) (/.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 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 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.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))))))))
(* 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 (*.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 #s(literal -1/2 binary64) (/.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 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 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.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))))))))
(* 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 (*.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 #s(literal -1/2 binary64) (/.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 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 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.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))))))))
(* 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 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 x-scale x-scale) (*.f64 (*.f64 (pow.f64 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 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)))))))
(+ (* 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 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 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 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 #s(literal 1/8 binary64) (*.f64 (*.f64 b b) (*.f64 x-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 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 (pow.f64 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 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)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 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 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))))))))))))
(+ (* 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 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 x-scale x-scale) (*.f64 (*.f64 (pow.f64 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 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 b b) (*.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 x-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 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 (pow.f64 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 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)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 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 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 b b) (*.f64 (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 #s(literal -1/2 binary64) (-.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)) (/.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 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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 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 (pow.f64 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 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 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 (pow.f64 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 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))))))) #s(literal 2 binary64)) (+.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 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 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 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))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 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 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)))))))))))))
(+ (* 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 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 x-scale x-scale) (*.f64 (*.f64 (pow.f64 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 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 b b) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 x-scale (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (+.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 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 (pow.f64 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 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)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 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 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 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 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)) (/.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 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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 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 (pow.f64 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 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 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 (pow.f64 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 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))))))) #s(literal 2 binary64)) (+.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 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 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 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))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 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 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 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 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)) (/.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 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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 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 (pow.f64 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 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 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 (pow.f64 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 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 #s(literal -1/2 binary64) (-.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)) (/.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 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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 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 (pow.f64 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 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 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 (pow.f64 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 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))))))) #s(literal 2 binary64)) (+.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 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 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 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 (*.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 x-scale x-scale) (*.f64 (*.f64 (pow.f64 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 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))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 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 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)))))))))))))))
(* 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 (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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (pow.f64 (cos.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 (*.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/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (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 (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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (pow.f64 (cos.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 (*.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/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 b b))) (+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.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 (pow.f64 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 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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (*.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/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 b #s(literal 4 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 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.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))) (*.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (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/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 (pow.f64 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 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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (*.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/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 b #s(literal 4 binary64))))) (+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.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 (pow.f64 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 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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (*.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/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 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 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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (*.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/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 b #s(literal 6 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 (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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (pow.f64 (cos.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 (*.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/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (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 (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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (pow.f64 (cos.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 (*.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/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (*.f64 b b))) (+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.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 (pow.f64 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 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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (*.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/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 b #s(literal 4 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 (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 x-scale (sqrt.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))) (*.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (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/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 (pow.f64 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 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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (*.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/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 b #s(literal 4 binary64))))) (+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (*.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 (pow.f64 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 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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (*.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/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))))) (+.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 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 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 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (*.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/2 binary64) (-.f64 (/.f64 (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))) (pow.f64 b #s(literal 6 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)))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
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/90 (* angle (PI)))
(*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))
(* angle (+ (* -1/4374000 (* (pow angle 2) (pow (PI) 3))) (* 1/90 (PI))))
(*.f64 angle (+.f64 (*.f64 (*.f64 #s(literal -1/4374000 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 #s(literal 1/90 binary64) (PI.f64))))
(* angle (+ (* 1/90 (PI)) (* (pow angle 2) (+ (* -1/4374000 (pow (PI) 3)) (* 1/708588000000 (* (pow angle 2) (pow (PI) 5)))))))
(*.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (PI.f64)) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal -1/4374000 binary64) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 #s(literal 1/708588000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 5 binary64)))))))
(* angle (+ (* 1/90 (PI)) (* (pow angle 2) (+ (* -1/4374000 (pow (PI) 3)) (* (pow angle 2) (+ (* -1/241061637600000000 (* (pow angle 2) (pow (PI) 7))) (* 1/708588000000 (pow (PI) 5))))))))
(*.f64 angle (+.f64 (*.f64 #s(literal 1/90 binary64) (PI.f64)) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal -1/4374000 binary64) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 (*.f64 #s(literal -1/241061637600000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 #s(literal 1/708588000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))))))))
(sin (* 1/90 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/90 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/90 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/90 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/90 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/90 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/90 (* angle (PI))))
(sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))
(sin (* 1/90 (* angle (PI))))
(sin.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))))

eval619.0ms (0.9%)

Compiler

Compiled 435240 to 9719 computations (97.8% saved)

prune493.0ms (0.7%)

Pruning

47 alts after pruning (46 fresh and 1 done)

PrunedKeptTotal
New2061442105
Fresh8210
Picked415
Done000
Total2073472120
Accuracy
52.4%
Counts
2120 → 47
Alt Table
Click to see full alt table
StatusAccuracyProgram
3.3%
(/.f64 (/.f64 (*.f64 (*.f64 a (*.f64 b (*.f64 a (*.f64 a b)))) #s(literal 4 binary64)) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
4.5%
(/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 b (*.f64 a (*.f64 a b))) #s(literal -4 binary64))) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 a b))) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
2.7%
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) y-scale) (/.f64 (*.f64 a (*.f64 a a)) (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
1.7%
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) x-scale) #s(literal 1 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) x-scale))))
3.4%
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
0.2%
(/.f64 (*.f64 (*.f64 (pow.f64 (*.f64 a b) #s(literal 1/4 binary64)) (pow.f64 (*.f64 a b) #s(literal 1/4 binary64))) (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a #s(literal 8 binary64))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale))))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
0.2%
(/.f64 (*.f64 (sqrt.f64 (*.f64 b a)) (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a #s(literal 8 binary64))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.f64 b a))))) (+.f64 (/.f64 (+.f64 (*.f64 (exp.f64 (*.f64 (log.f64 a) #s(literal 2 binary64))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale))))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
1.9%
(/.f64 (*.f64 a (*.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 y-scale (*.f64 x-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
0.1%
(/.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))))) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
0.2%
(*.f64 (/.f64 (pow.f64 (*.f64 a b) #s(literal 1/2 binary64)) #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 (*.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 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 (*.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)) (hypot.f64 (-.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale x-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 (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 a a)) (/.f64 (*.f64 x-scale y-scale) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 b (*.f64 a (*.f64 a b)))) (*.f64 #s(literal 8 binary64) (*.f64 a b))))) (*.f64 (/.f64 b (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a (*.f64 a b)) x-scale))))
2.5%
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
1.1%
(*.f64 (/.f64 (/.f64 (*.f64 a (*.f64 a a)) x-scale) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) (*.f64 y-scale (*.f64 x-scale y-scale)))))
2.1%
(*.f64 (/.f64 (/.f64 (*.f64 a (*.f64 a a)) x-scale) #s(literal 4 binary64)) (/.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (*.f64 (/.f64 b (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a (*.f64 a b)) x-scale))))
2.5%
(*.f64 (/.f64 (*.f64 a (*.f64 a a)) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) (*.f64 y-scale (*.f64 x-scale y-scale)))))
1.1%
(*.f64 (/.f64 (*.f64 a (*.f64 a a)) (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) x-scale))) (/.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 y-scale (*.f64 x-scale y-scale))))
3.6%
(*.f64 (/.f64 (*.f64 a (*.f64 a a)) #s(literal 4 binary64)) (/.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 (/.f64 b (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a (*.f64 a b)) x-scale))))
2.2%
(*.f64 (/.f64 a (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) x-scale))) (/.f64 (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) (*.f64 y-scale (*.f64 x-scale y-scale))))
1.6%
(*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64))))) y-scale) (*.f64 y-scale (*.f64 x-scale x-scale)))
0.2%
(*.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 (*.f64 (*.f64 a b) (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 a b)) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 b (*.f64 a (*.f64 a b)))))) (+.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.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 (*.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)) (hypot.f64 (-.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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 x-scale x-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 (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 a a)) (/.f64 (*.f64 x-scale y-scale) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64))))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale))
3.1%
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))))))
17.1%
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) 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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
14.5%
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) 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 #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 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)))))))
4.1%
(*.f64 (*.f64 (sqrt.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 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 x-scale x-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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-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))))) (pow.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 x-scale x-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 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))
34.7%
(*.f64 (*.f64 a (*.f64 x-scale #s(literal 4 binary64))) #s(literal 1/4 binary64))
35.0%
(*.f64 (*.f64 a x-scale) #s(literal 1 binary64))
3.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 (cbrt.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))))))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (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)))))))
2.9%
(*.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 (cbrt.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (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)))))))
2.9%
(*.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 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64))))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
3.3%
(*.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)))))))
1.1%
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 angle 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)))))))))
1.9%
(*.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))))))))
0.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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.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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
3.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 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)))))))))))))
34.8%
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 a (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 2 binary64)))
2.7%
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.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 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.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 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
1.2%
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 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 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)))))))
3.1%
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 (exp.f64 (*.f64 (log.f64 a) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)))))))))
3.2%
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (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 #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 a a) (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 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 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)))))))))
3.6%
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (exp.f64 (*.f64 (log.f64 #s(literal 8 binary64)) #s(literal 1/2 binary64))))) (sqrt.f64 (+.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 (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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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)))))))))
11.3%
(*.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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
11.5%
(*.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))
9.9%
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 x-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 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))
35.0%
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a x-scale)) #s(literal 4 binary64))
1.0%
(*.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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))
34.7%
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 a x-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (sqrt.f64 #s(literal 2 binary64)))))
2.5%
(neg.f64 (/.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 a b))) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
Compiler

Compiled 8570 to 3220 computations (62.4% saved)

simplify332.0ms (0.5%)

Algorithm
egg-herbie
Localize:

Found 17 expressions of interest:

NewMetricScoreProgram
cost-diff1152
(log.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale))))))))
cost-diff1152
(*.f64 (log.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))))) #s(literal 1/2 binary64))
cost-diff7680
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))))) #s(literal 1/2 binary64)))
cost-diff7680
(/.f64 (exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))))) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
cost-diff192
(*.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 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))))
cost-diff192
(+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
cost-diff192
(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 #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 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))))))
cost-diff192
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) 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 #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 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)))))))
cost-diff0
(*.f64 x-scale y-scale)
cost-diff0
(/.f64 a (*.f64 x-scale y-scale))
cost-diff0
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) y-scale))
cost-diff0
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
cost-diff0
(*.f64 a x-scale)
cost-diff0
(*.f64 #s(literal 1/4 binary64) (*.f64 a x-scale))
cost-diff256
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a x-scale)) #s(literal 4 binary64))
cost-diff0
(*.f64 a x-scale)
cost-diff128
(*.f64 (*.f64 a x-scale) #s(literal 1 binary64))
Rules
6570×*-lowering-*.f32
6570×*-lowering-*.f64
4520×/-lowering-/.f32
4520×/-lowering-/.f64
1814×associate-/l*
Iterations

Useful iterations: 3 (0.0ms)

IterNodesCost
0982469
13092420
214322196
358872192
086722192
Stop Event
iter limit
node limit
Calls
Call 1
Inputs
(* (* a x-scale) 1)
(* a x-scale)
a
x-scale
1
(* (* 1/4 (* a x-scale)) 4)
(* 1/4 (* a x-scale))
1/4
(* a x-scale)
a
x-scale
4
(/ (* (/ a (* x-scale y-scale)) (/ (* a (* a (* (* b b) 4))) y-scale)) (/ (* 4 (* a (* b (* b a)))) (* x-scale (* y-scale (* x-scale y-scale)))))
(* (/ a (* x-scale y-scale)) (/ (* a (* a (* (* b b) 4))) y-scale))
(/ a (* x-scale y-scale))
a
(* x-scale y-scale)
x-scale
y-scale
(/ (* a (* a (* (* b b) 4))) y-scale)
(* a (* a (* (* b b) 4)))
(* a (* (* b b) 4))
(* (* b b) 4)
(* b b)
b
4
(/ (* 4 (* a (* b (* b a)))) (* x-scale (* y-scale (* x-scale y-scale))))
(* 4 (* a (* b (* b a))))
(* a (* b (* b a)))
(* b (* b a))
(* b a)
(* x-scale (* y-scale (* x-scale y-scale)))
(* y-scale (* 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)) (* -1/2 (/ (* (* (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/4 b) (* x-scale (* y-scale (sqrt 8))))
(* 1/4 b)
1/4
b
(* x-scale (* y-scale (sqrt 8)))
x-scale
(* y-scale (sqrt 8))
y-scale
(sqrt 8)
8
(sqrt (+ (/ (pow (cos (* 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 (sin (* 1/180 (* angle (PI)))) 2)))))
(+ (/ (pow (cos (* 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 (sin (* 1/180 (* angle (PI)))) 2))))
(/ (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)
(* -1/2 (/ (* (* (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
(/ (* (* (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) (/ (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 (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))
(pow (sin (* 1/180 (* angle (PI)))) 2)
(sin (* 1/180 (* angle (PI))))
(/ (exp (* (log (* (/ (* (* b a) (* b (* a 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a))))) (+ (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (- (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale)))))))))) 1/2)) (/ (* 4 (* a (* b (* b a)))) (* x-scale (* y-scale (* x-scale y-scale)))))
(exp (* (log (* (/ (* (* b a) (* b (* a 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a))))) (+ (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (- (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale)))))))))) 1/2))
(* (log (* (/ (* (* b a) (* b (* a 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a))))) (+ (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (- (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale)))))))))) 1/2)
(log (* (/ (* (* b a) (* b (* a 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a))))) (+ (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (- (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))))))))))
(* (/ (* (* b a) (* b (* a 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a))))) (+ (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (- (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale)))))))))
(/ (* (* b a) (* b (* a 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a)))))
(* (* b a) (* b (* a 8)))
(* b a)
b
a
(* b (* a 8))
(* a 8)
8
(/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a))))
(* x-scale (* x-scale (* y-scale y-scale)))
x-scale
(* x-scale (* y-scale y-scale))
(* y-scale y-scale)
y-scale
(* b (* a (* b a)))
(* a (* b a))
(+ (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (- (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))))))))
(/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale))
(+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))))
(* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))
(* a a)
(- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))
1/2
(* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))
(cos (* 2 (/ (* angle (PI)) 180)))
(* 2 (/ (* angle (PI)) 180))
2
(/ (* angle (PI)) 180)
(* angle (PI))
angle
(PI)
180
(* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))
(* b b)
(+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))
(* x-scale x-scale)
(- (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale)))))))
(/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))
(+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))))
(* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))))
(* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))
(* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))
(sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))))))
(- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))
(* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale)))
(- (* b b) (* a a))
(/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))
(sin (* 2 (/ (* angle (PI)) 180)))
(* x-scale y-scale)
(/ (* 4 (* a (* b (* b a)))) (* x-scale (* y-scale (* x-scale y-scale))))
(* 4 (* a (* b (* b a))))
4
(* a (* b (* b a)))
(* b (* b a))
(* x-scale (* y-scale (* x-scale y-scale)))
(* y-scale (* x-scale y-scale))
Outputs
(* (* 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)) 4)
(*.f64 a x-scale)
(* 1/4 (* a x-scale))
(*.f64 x-scale (*.f64 a #s(literal 1/4 binary64)))
1/4
#s(literal 1/4 binary64)
(* a x-scale)
(*.f64 a x-scale)
a
x-scale
4
#s(literal 4 binary64)
(/ (* (/ a (* x-scale y-scale)) (/ (* a (* a (* (* b b) 4))) y-scale)) (/ (* 4 (* a (* b (* b a)))) (* x-scale (* y-scale (* x-scale y-scale)))))
(/.f64 (/.f64 (/.f64 (*.f64 a (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) y-scale)) x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) y-scale) (*.f64 x-scale (*.f64 x-scale y-scale))))
(* (/ a (* x-scale y-scale)) (/ (* a (* a (* (* b b) 4))) y-scale))
(/.f64 (/.f64 (*.f64 a (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) y-scale)) x-scale) y-scale)
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
a
(* x-scale y-scale)
(*.f64 x-scale y-scale)
x-scale
y-scale
(/ (* a (* a (* (* b b) 4))) y-scale)
(/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) y-scale)
(* a (* a (* (* b b) 4)))
(*.f64 a (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b))))
(* a (* (* b b) 4))
(*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))
(* (* b b) 4)
(*.f64 #s(literal 4 binary64) (*.f64 b b))
(* b b)
(*.f64 b b)
b
4
#s(literal 4 binary64)
(/ (* 4 (* a (* b (* b a)))) (* x-scale (* y-scale (* x-scale y-scale))))
(/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) y-scale) (*.f64 x-scale (*.f64 x-scale y-scale)))
(* 4 (* a (* b (* b a))))
(*.f64 a (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b))))
(* a (* b (* b a)))
(*.f64 a (*.f64 b (*.f64 a b)))
(* b (* b a))
(*.f64 b (*.f64 a b))
(* b a)
(*.f64 a b)
(* x-scale (* y-scale (* x-scale y-scale)))
(*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))
(* y-scale (* x-scale y-scale))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* (* (* 1/4 b) (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (/ (pow (cos (* 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 (sin (* 1/180 (* angle (PI)))) 2))))))
(*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (*.f64 x-scale (*.f64 #s(literal 1/4 binary64) b))) (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)) (neg.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 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) (* x-scale (* y-scale (sqrt 8))))
(*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (*.f64 x-scale (*.f64 #s(literal 1/4 binary64) b)))
(* 1/4 b)
(*.f64 #s(literal 1/4 binary64) b)
1/4
#s(literal 1/4 binary64)
b
(* 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 y-scale (sqrt.f64 #s(literal 8 binary64)))
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)) (* -1/2 (/ (* (* (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)))))
(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)) (neg.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 x-scale x-scale))) (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) (* 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 (sin (* 1/180 (* angle (PI)))) 2))))
(+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (neg.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
(/ (pow (cos (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))
(/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))
(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)
(* x-scale x-scale)
(*.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) (pow (sin (* 1/180 (* angle (PI)))) 2)))
(neg.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 x-scale x-scale))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))
-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) (pow (sin (* 1/180 (* angle (PI)))) 2))
(/.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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(* (* (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)) (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) (* 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 (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))
(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))))
(/ (exp (* (log (* (/ (* (* b a) (* b (* a 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a))))) (+ (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (- (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale)))))))))) 1/2)) (/ (* 4 (* a (* b (* b a)))) (* x-scale (* y-scale (* x-scale y-scale)))))
(/.f64 (sqrt.f64 (/.f64 (*.f64 (*.f64 a (*.f64 (*.f64 b (*.f64 a b)) #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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 (*.f64 b b) #s(literal 1/2 binary64)))) (*.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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 (*.f64 b b) #s(literal 1/2 binary64)))) (*.f64 x-scale x-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 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 y-scale y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale)))))) (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 b (*.f64 a b)))))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) y-scale) (*.f64 x-scale (*.f64 x-scale y-scale))))
(exp (* (log (* (/ (* (* b a) (* b (* a 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a))))) (+ (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (- (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale)))))))))) 1/2))
(sqrt.f64 (/.f64 (*.f64 (*.f64 a (*.f64 (*.f64 b (*.f64 a b)) #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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 (*.f64 b b) #s(literal 1/2 binary64)))) (*.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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 (*.f64 b b) #s(literal 1/2 binary64)))) (*.f64 x-scale x-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 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 y-scale y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale)))))) (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 b (*.f64 a b))))))
(* (log (* (/ (* (* b a) (* b (* a 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a))))) (+ (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (- (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale)))))))))) 1/2)
(*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 (*.f64 (*.f64 a (*.f64 (*.f64 b (*.f64 a b)) #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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 (*.f64 b b) #s(literal 1/2 binary64)))) (*.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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 (*.f64 b b) #s(literal 1/2 binary64)))) (*.f64 x-scale x-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 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 y-scale y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale)))))) (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 b (*.f64 a b)))))))
(log (* (/ (* (* b a) (* b (* a 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a))))) (+ (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (- (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))))))))))
(log.f64 (/.f64 (*.f64 (*.f64 a (*.f64 (*.f64 b (*.f64 a b)) #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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 (*.f64 b b) #s(literal 1/2 binary64)))) (*.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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 (*.f64 b b) #s(literal 1/2 binary64)))) (*.f64 x-scale x-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 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 y-scale y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale)))))) (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 b (*.f64 a b))))))
(* (/ (* (* b a) (* b (* a 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a))))) (+ (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (- (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale)))))))))
(/.f64 (*.f64 (*.f64 a (*.f64 (*.f64 b (*.f64 a b)) #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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 (*.f64 b b) #s(literal 1/2 binary64)))) (*.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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 (*.f64 b b) #s(literal 1/2 binary64)))) (*.f64 x-scale x-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 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 y-scale y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale)))))) (/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 b (*.f64 a b)))))
(/ (* (* b a) (* b (* a 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a)))))
(/.f64 (*.f64 (*.f64 a (*.f64 b (*.f64 a b))) (*.f64 a (*.f64 (*.f64 b (*.f64 a b)) #s(literal 8 binary64)))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(* (* b a) (* b (* a 8)))
(*.f64 a (*.f64 (*.f64 b (*.f64 a b)) #s(literal 8 binary64)))
(* b a)
(*.f64 a b)
b
a
(* b (* a 8))
(*.f64 a (*.f64 b #s(literal 8 binary64)))
(* a 8)
(*.f64 a #s(literal 8 binary64))
8
#s(literal 8 binary64)
(/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a))))
(/.f64 (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 b (*.f64 a b))))
(* x-scale (* x-scale (* y-scale y-scale)))
(*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))
x-scale
(* x-scale (* y-scale y-scale))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* y-scale y-scale)
(*.f64 y-scale y-scale)
y-scale
(* b (* a (* b a)))
(*.f64 a (*.f64 b (*.f64 a b)))
(* a (* b a))
(*.f64 a (*.f64 a b))
(+ (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (- (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 (*.f64 b b) #s(literal 1/2 binary64)))) (*.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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 (*.f64 b b) #s(literal 1/2 binary64)))) (*.f64 x-scale x-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 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 y-scale y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale)))))
(/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-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 #s(literal 1 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 (*.f64 b b) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))
(+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))))
(+.f64 (*.f64 (*.f64 a a) (+.f64 #s(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) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 (*.f64 b b) #s(literal 1/2 binary64))))
(* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))
(*.f64 (*.f64 a a) (+.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 a)
(*.f64 a a)
(- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))
(+.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/2
#s(literal 1/2 binary64)
(* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))
(cos (* 2 (/ (* angle (PI)) 180)))
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(* 2 (/ (* angle (PI)) 180))
(*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))
2
#s(literal 2 binary64)
(/ (* angle (PI)) 180)
(*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))
(* angle (PI))
(*.f64 angle (PI.f64))
angle
(PI)
(PI.f64)
180
#s(literal 180 binary64)
(* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))
(*.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 (*.f64 b b) #s(literal 1/2 binary64)))
(* b b)
(*.f64 b b)
(+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))
(* x-scale x-scale)
(*.f64 x-scale x-scale)
(- (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 (*.f64 b b) #s(literal 1/2 binary64)))) (*.f64 x-scale x-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 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 y-scale y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))))
(/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-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 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 y-scale y-scale))
(+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))))
(+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.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))))))))
(* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))))
(*.f64 (*.f64 a a) (+.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 (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))
(*.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))))))
(* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))
(*.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)))))))
(sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 (*.f64 b b) #s(literal 1/2 binary64)))) (*.f64 x-scale x-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 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 y-scale y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale)))
(- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 (*.f64 b b) #s(literal 1/2 binary64)))) (*.f64 x-scale x-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 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 y-scale y-scale)))
(* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale)))
(/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))
(- (* b b) (* a a))
(-.f64 (*.f64 b b) (*.f64 a a))
(/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))
(/.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (*.f64 x-scale y-scale))
(sin (* 2 (/ (* angle (PI)) 180)))
(sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(/ (* 4 (* a (* b (* b a)))) (* x-scale (* y-scale (* x-scale y-scale))))
(/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))) y-scale) (*.f64 x-scale (*.f64 x-scale y-scale)))
(* 4 (* a (* b (* b a))))
(*.f64 a (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b))))
4
#s(literal 4 binary64)
(* a (* b (* b a)))
(*.f64 a (*.f64 b (*.f64 a b)))
(* b (* b a))
(*.f64 b (*.f64 a b))
(* x-scale (* y-scale (* x-scale y-scale)))
(*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))
(* y-scale (* x-scale y-scale))
(*.f64 x-scale (*.f64 y-scale y-scale))

localize4.1s (6.2%)

Localize:

Found 17 expressions of interest:

NewMetricScoreProgram
accuracy100.0%
(log.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale))))))))
accuracy100.0%
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) (*.f64 b (*.f64 a #s(literal 8 binary64)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale)))))))) #s(literal 1/2 binary64)))
accuracy100.0%
(cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))))
accuracy3.1%
(PI.f64)
accuracy100.0%
(sqrt.f64 #s(literal 8 binary64))
accuracy100.0%
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
accuracy100.0%
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
accuracy3.1%
(PI.f64)
accuracy100.0%
(*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))
accuracy100.0%
(*.f64 a (*.f64 b (*.f64 b a)))
accuracy100.0%
(*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64))))
accuracy100.0%
(*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a))))
accuracy100.0%
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a x-scale)) #s(literal 4 binary64))
accuracy100.0%
(*.f64 a x-scale)
accuracy100.0%
(*.f64 #s(literal 1/4 binary64) (*.f64 a x-scale))
accuracy100.0%
(*.f64 (*.f64 a x-scale) #s(literal 1 binary64))
accuracy100.0%
(*.f64 a x-scale)
Results
3.7s256×5exit
Compiler

Compiled 2530 to 96 computations (96.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 3.2s
ival-sin: 811.0ms (25.7% of total)
ival-cos: 784.0ms (24.8% of total)
ival-mult: 582.0ms (18.4% of total)
backward-pass: 246.0ms (7.8% of total)
ival-div: 198.0ms (6.3% of total)
ival-sub: 113.0ms (3.6% of total)
...c/correct-round.rkt:119:19: 111.0ms (3.5% of total)
ival-log: 101.0ms (3.2% of total)
ival-pow: 81.0ms (2.6% of total)
ival-add: 42.0ms (1.3% of total)
compiled-spec: 33.0ms (1% of total)
ival-sqrt: 27.0ms (0.9% of total)
ival-exp: 16.0ms (0.5% of total)
ival-pi: 8.0ms (0.3% of total)
const: 5.0ms (0.2% of total)

series717.0ms (1.1%)

Counts
25 → 744
Calls
Call 1
Inputs
#<alt (* (* a x-scale) 1)>
#<alt (* a x-scale)>
#<alt (* (* 1/4 (* a x-scale)) 4)>
#<alt (* 1/4 (* a x-scale))>
#<alt (/ (* (/ a (* x-scale y-scale)) (/ (* a (* a (* (* b b) 4))) y-scale)) (/ (* 4 (* a (* b (* b a)))) (* x-scale (* y-scale (* x-scale y-scale)))))>
#<alt (* (/ a (* x-scale y-scale)) (/ (* a (* a (* (* b b) 4))) y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (* x-scale y-scale)>
#<alt (* (* (* 1/4 b) (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (/ (pow (cos (* 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 (sin (* 1/180 (* angle (PI)))) 2))))))>
#<alt (sqrt (+ (/ (pow (cos (* 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 (sin (* 1/180 (* angle (PI)))) 2)))))>
#<alt (+ (/ (pow (cos (* 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 (sin (* 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) (pow (sin (* 1/180 (* angle (PI)))) 2)))>
#<alt (/ (exp (* (log (* (/ (* (* b a) (* b (* a 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a))))) (+ (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (- (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale)))))))))) 1/2)) (/ (* 4 (* a (* b (* b a)))) (* x-scale (* y-scale (* x-scale y-scale)))))>
#<alt (exp (* (log (* (/ (* (* b a) (* b (* a 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a))))) (+ (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (- (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale)))))))))) 1/2))>
#<alt (* (log (* (/ (* (* b a) (* b (* a 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a))))) (+ (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (- (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale)))))))))) 1/2)>
#<alt (log (* (/ (* (* b a) (* b (* a 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a))))) (+ (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (- (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))))))))))>
#<alt (* 4 (* a (* b (* b a))))>
#<alt (* a (* a (* (* b b) 4)))>
#<alt (* a (* b (* b a)))>
#<alt (* a (* (* b b) 4))>
#<alt (PI)>
#<alt (cos (* 1/180 (* angle (PI))))>
#<alt (sin (* 1/180 (* angle (PI))))>
#<alt (sqrt 8)>
#<alt (cos (* 2 (/ (* angle (PI)) 180)))>
Outputs
#<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 (* 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/4 (* a x-scale))>
#<alt (* 1/4 (* a x-scale))>
#<alt (* 1/4 (* a x-scale))>
#<alt (* 1/4 (* a x-scale))>
#<alt (* 1/4 (* a x-scale))>
#<alt (* 1/4 (* a x-scale))>
#<alt (* 1/4 (* a x-scale))>
#<alt (* 1/4 (* a x-scale))>
#<alt (* 1/4 (* a x-scale))>
#<alt (* 1/4 (* a x-scale))>
#<alt (* 1/4 (* a x-scale))>
#<alt (* 1/4 (* a x-scale))>
#<alt (* 1/4 (* a x-scale))>
#<alt (* 1/4 (* a x-scale))>
#<alt (* 1/4 (* a x-scale))>
#<alt (* 1/4 (* a x-scale))>
#<alt (* 1/4 (* a x-scale))>
#<alt (* 1/4 (* a x-scale))>
#<alt (* 1/4 (* a x-scale))>
#<alt (* 1/4 (* a x-scale))>
#<alt (* 1/4 (* a x-scale))>
#<alt (* 1/4 (* a x-scale))>
#<alt (* 1/4 (* a x-scale))>
#<alt (* 1/4 (* 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 (* a x-scale)>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (* x-scale y-scale)>
#<alt (* x-scale y-scale)>
#<alt (* x-scale y-scale)>
#<alt (* x-scale y-scale)>
#<alt (* x-scale y-scale)>
#<alt (* x-scale y-scale)>
#<alt (* x-scale y-scale)>
#<alt (* x-scale y-scale)>
#<alt (* x-scale y-scale)>
#<alt (* x-scale y-scale)>
#<alt (* x-scale y-scale)>
#<alt (* x-scale y-scale)>
#<alt (* x-scale y-scale)>
#<alt (* x-scale y-scale)>
#<alt (* x-scale y-scale)>
#<alt (* x-scale y-scale)>
#<alt (* x-scale y-scale)>
#<alt (* x-scale y-scale)>
#<alt (* x-scale y-scale)>
#<alt (* x-scale y-scale)>
#<alt (* x-scale y-scale)>
#<alt (* x-scale y-scale)>
#<alt (* x-scale y-scale)>
#<alt (* x-scale y-scale)>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* -1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* -1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* -1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* -1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 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 x-scale 2)))))))>
#<alt (* angle (+ (* 1/8 (* (* (pow angle 2) (* b (* x-scale (* y-scale (* (sqrt 8) (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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 (* (* b (* 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 (* (* b (* 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 (* (* b (* x-scale (* y-scale (* (sqrt 8) (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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 (* (* (pow angle 2) (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1 (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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 (* (* b (* 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 (* (* b (* x-scale (* y-scale (* (sqrt 8) (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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 (* (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1 (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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 (* (* (pow angle 2) (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1 (+ (* 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/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 (/ (* (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (- (+ (* -1 (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* angle (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))))>
#<alt (* angle (+ (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))) (* 1/2 (* (* (pow angle 2) (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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))))))))))>
#<alt (* angle (+ (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))) (* (pow angle 2) (+ (* 1/2 (* (* (pow angle 2) (- (+ (* -1 (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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/2 (* (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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))))))))))))>
#<alt (* angle (+ (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))) (* (pow angle 2) (+ (* 1/2 (* (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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/2 (* (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))) (- (+ (* -1 (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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/2 (* (* (pow angle 2) (- (+ (* -1 (+ (* 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/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 (/ (* (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (- (+ (* -1 (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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 (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))>
#<alt (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))>
#<alt (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))>
#<alt (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))>
#<alt (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))>
#<alt (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))>
#<alt (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))>
#<alt (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))>
#<alt (* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))>
#<alt (* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))>
#<alt (* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))>
#<alt (* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))>
#<alt (* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))>
#<alt (* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))>
#<alt (* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))>
#<alt (* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))>
#<alt (* -1 (* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* -1 (* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* -1 (* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* -1 (* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<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 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (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 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (+ (* 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/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))))))))))))))))))>
#<alt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))>
#<alt (/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))>
#<alt (/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))>
#<alt (/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))>
#<alt (/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))>
#<alt (/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))>
#<alt (/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))>
#<alt (/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))>
#<alt (/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))>
#<alt (/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))>
#<alt (/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))>
#<alt (/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))>
#<alt (/ -1 (pow x-scale 2))>
#<alt (- (* 1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow x-scale 2))) (/ 1 (pow x-scale 2)))>
#<alt (- (* (pow angle 2) (+ (* -1 (* (pow angle 2) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))) (/ 1 (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/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2)))))) (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))))))) (/ 1 (pow x-scale 2)))>
#<alt (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (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 a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (* (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (* 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 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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))))) (/ (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (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)))))) (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 (+ (/ (* (pow (sin (* 1/90 (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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 (* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (pow b 2) (+ (* 4 (* (/ (* (pow a 2) (* (pow b 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 8)))) (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 2) (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (pow b 2) (+ (* (/ (* (pow a 2) (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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/2 (* (/ (* (pow a 2) (* (pow b 2) (- (* -4 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 16 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sqrt 8) 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 8)))) (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 8)))) (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (pow b 2) (+ (* (/ (* (pow a 2) (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* 4 (* (/ (* (pow a 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 8)))) (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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/2 (* (/ (* (pow a 2) (* (pow b 2) (- (* 2 (* (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (* 4 (/ (* (- (* -4 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 16 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sqrt 8) 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sqrt 8) 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 8)))) (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow a 2) (- (* -4 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 16 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sqrt 8) 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 8)))) (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow a 2) (* (pow b 3) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (pow b 3) (+ (* 4 (* (/ (* (pow a 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (* (/ (* (pow a 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (pow b 3) (+ (* 1/2 (* (/ (* (pow a 2) (- (* -4 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (* 16 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (* (pow (sqrt 8) 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))))) (* (pow b 4) (* x-scale (* y-scale (sqrt 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (+ (* 4 (* (/ (* (pow a 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (* (/ (* (pow a 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (pow b 3) (+ (* 1/2 (* (/ (* (pow a 2) (- (* -4 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (* 16 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (* (pow (sqrt 8) 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))))) (* (pow b 4) (* x-scale (* y-scale (sqrt 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (/ (* (pow a 2) (- (* 2 (* (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (* 4 (/ (* (- (* -4 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (* 16 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (* (pow (sqrt 8) 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (sqrt 8) 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))))) (* (pow b 6) (* x-scale (* y-scale (sqrt 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (+ (* 4 (* (/ (* (pow a 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (* (/ (* (pow a 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (/ (* (pow a 2) (* (pow b 3) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (pow b 3) (+ (* 4 (* (/ (* (pow a 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (* (/ (* (pow a 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (pow b 3) (+ (* 1/2 (* (/ (* (pow a 2) (- (* -4 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (* 16 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (* (pow (sqrt 8) 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))))) (* (pow b 4) (* x-scale (* y-scale (sqrt 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (+ (* 4 (* (/ (* (pow a 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (* (/ (* (pow a 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (pow b 3) (+ (* 1/2 (* (/ (* (pow a 2) (- (* -4 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (* 16 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (* (pow (sqrt 8) 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))))) (* (pow b 4) (* x-scale (* y-scale (sqrt 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (/ (* (pow a 2) (- (* 2 (* (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (* 4 (/ (* (- (* -4 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (* 16 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (* (pow (sqrt 8) 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (sqrt 8) 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))))) (* (pow b 6) (* x-scale (* y-scale (sqrt 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (+ (* 4 (* (/ (* (pow a 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (* (/ (* (pow a 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (pow a 2) (+ (* 4 (* (/ (* (pow a 2) (* (pow b 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 8)))) (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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 2) (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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (pow a 2) (+ (* (/ (* (pow b 2) (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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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/2 (* (/ (* (pow a 2) (* (pow b 2) (- (* -4 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 16 (/ (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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sqrt 8) 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 8)))) (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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 8)))) (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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (pow a 2) (+ (* (/ (* (pow b 2) (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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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) (+ (* 4 (* (/ (* (pow b 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 8)))) (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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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/2 (* (/ (* (pow a 2) (* (pow b 2) (- (* 2 (* (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (* 4 (/ (* (- (* -4 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 16 (/ (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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sqrt 8) 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sqrt 8) 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 8)))) (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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow b 2) (- (* -4 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 16 (/ (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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sqrt 8) 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 8)))) (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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow a 3) (* (pow b 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (pow a 3) (+ (* 4 (* (/ (* (pow b 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (* (/ (* (pow b 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (pow a 3) (+ (* 1/2 (* (/ (* (pow b 2) (- (* -4 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) (* 16 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (* (pow (sqrt 8) 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))))) (* (pow a 4) (* x-scale (* y-scale (sqrt 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (+ (* 4 (* (/ (* (pow b 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (* (/ (* (pow b 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (pow a 3) (+ (* 1/2 (* (/ (* (pow b 2) (- (* -4 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) (* 16 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (* (pow (sqrt 8) 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))))) (* (pow a 4) (* x-scale (* y-scale (sqrt 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (/ (* (pow b 2) (- (* 2 (* (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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))))) (* 4 (/ (* (- (* -4 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) (* 16 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (* (pow (sqrt 8) 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (sqrt 8) 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))))) (* (pow a 6) (* x-scale (* y-scale (sqrt 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (+ (* 4 (* (/ (* (pow b 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (* (/ (* (pow b 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (/ (* (pow a 3) (* (pow b 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (pow a 3) (+ (* 4 (* (/ (* (pow b 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (* (/ (* (pow b 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (pow a 3) (+ (* 1/2 (* (/ (* (pow b 2) (- (* -4 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) (* 16 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (* (pow (sqrt 8) 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))))) (* (pow a 4) (* x-scale (* y-scale (sqrt 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (+ (* 4 (* (/ (* (pow b 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (* (/ (* (pow b 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (pow a 3) (+ (* 1/2 (* (/ (* (pow b 2) (- (* -4 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) (* 16 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (* (pow (sqrt 8) 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))))) (* (pow a 4) (* x-scale (* y-scale (sqrt 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (/ (* (pow b 2) (- (* 2 (* (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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))))) (* 4 (/ (* (- (* -4 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) (* 16 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (* (pow (sqrt 8) 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (sqrt 8) 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))))) (* (pow a 6) (* x-scale (* y-scale (sqrt 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (+ (* 4 (* (/ (* (pow b 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (* (/ (* (pow b 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (/ (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (* (pow x-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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (* (sqrt 8) (+ (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (/ (+ (* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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) (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (* (sqrt 8) (+ (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (* (pow 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 8))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (/ (+ (* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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) (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (* (sqrt 8) (+ (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (- (* 4 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))))))))) (* -2 (/ (* (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (* (pow 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 8))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 2) (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (* (pow 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 8))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (/ (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (* (sqrt 8) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (/ (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (* (sqrt 8) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow a 2) (* (pow b 2) (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 8)))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (/ (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (* (sqrt 8) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow a 2) (* (pow b 2) (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 8)))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow a 2) (* (pow b 2) (- (* 4 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (* -2 (/ (* (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 8)))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (/ (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (* (sqrt 8) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (/ (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (* (sqrt 8) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow a 2) (* (pow b 2) (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 8)))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (/ (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (* (sqrt 8) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow a 2) (* (pow b 2) (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 8)))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow a 2) (* (pow b 2) (- (* 4 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (* -2 (/ (* (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 8)))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (/ (+ (* -2 (* (/ (* (pow a 2) (* (pow b 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))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (* (sqrt 8) (+ (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (/ (+ (* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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) (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (* (sqrt 8) (+ (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (* (pow 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 8))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (/ (+ (* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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) (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (* (sqrt 8) (+ (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (- (* 4 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))))))))) (* -2 (/ (* (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (* (pow 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 8))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 2) (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (* (pow 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 8))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (/ (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (* (sqrt 8) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (/ (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (* (sqrt 8) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 2) (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 8)))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (/ (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (* (sqrt 8) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 2) (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 8)))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 2) (- (* 4 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (* -2 (/ (* (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 8)))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (/ (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (* (sqrt 8) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (/ (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (* (sqrt 8) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 2) (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 8)))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (/ (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (* (sqrt 8) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 2) (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 8)))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 2) (- (* 4 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (* -2 (/ (* (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 8)))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (+ (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2)))) (/ (* a (* (pow angle 2) (* (pow b 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) x-scale))>
#<alt (+ (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* a (* (pow angle 2) (* (pow b 2) (- (* 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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 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)))))) x-scale)) (/ (* a (* (pow b 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) x-scale))))>
#<alt (+ (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2)))) (* (pow angle 2) (+ (* (pow angle 2) (+ (* 1/8 (/ (* a (* (pow angle 2) (* (pow b 2) (- (* 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 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/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))))) (/ (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (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)))))) (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow y-scale 2) (* (- (* 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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 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))) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 a 2))))))) x-scale)) (* 1/8 (/ (* a (* (pow b 2) (- (* 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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 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))))) x-scale)))) (/ (* a (* (pow b 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) x-scale))))>
#<alt (* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow (sin (* 1/90 (* 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 (* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow (sin (* 1/90 (* 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 (* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow (sin (* 1/90 (* 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 (* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow (sin (* 1/90 (* 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 (* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow (sin (* 1/90 (* 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 (* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow (sin (* 1/90 (* 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 (* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow (sin (* 1/90 (* 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 (* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow (sin (* 1/90 (* 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/2 (+ (log (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 x-scale 2) (pow y-scale 2))))) (* 4 (log b))))>
#<alt (+ (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 x-scale 2) (pow y-scale 2))))) (* 4 (log b)))) (* 1/2 (/ (* (pow b 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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/2 (+ (log (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 x-scale 2) (pow y-scale 2))))) (* 4 (log b)))) (* (pow b 2) (+ (* 1/48 (* (pow b 2) (+ (* -12 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* -12 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2)))))) (* 1/2 (/ (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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/2 (+ (log (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 x-scale 2) (pow y-scale 2))))) (* 4 (log b)))) (* (pow b 2) (+ (* 1/2 (/ (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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/1440 (* (pow b 2) (+ (* 180 (* (/ (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (+ (* 240 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) 3) (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))) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))) (* 360 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2)))))))) (* 1/48 (+ (* -12 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* -12 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2))))))))))>
#<alt (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ 1 b)))))>
#<alt (+ (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ 1 b))))) (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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/48 (/ (+ (* -12 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))) (* -12 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (pow (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) 2)))) (pow b 4))) (+ (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ 1 b))))) (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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/1440 (/ (+ (* 180 (* (/ (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (sqrt (/ 1 (pow (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (* 240 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) 3))) (* 360 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) 2)))))) (pow b 6))) (+ (* 1/48 (/ (+ (* -12 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))) (* -12 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (pow (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) 2)))) (pow b 4))) (+ (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ 1 b))))) (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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/2 (+ (log (* 8 (/ (* (pow a 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ -1 b)))))>
#<alt (+ (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ -1 b))))) (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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/48 (/ (+ (* -12 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))) (* -12 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (pow (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) 2)))) (pow b 4))) (+ (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ -1 b))))) (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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/1440 (/ (+ (* 180 (* (/ (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (sqrt (/ 1 (pow (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (* 240 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) 3))) (* 360 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) 2)))))) (pow b 6))) (+ (* 1/48 (/ (+ (* -12 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))) (* -12 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (pow (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) 2)))) (pow b 4))) (+ (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ -1 b))))) (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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/2 (+ (log (* 8 (/ (* (pow b 4) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 x-scale 2) (pow y-scale 2))))) (* 4 (log a))))>
#<alt (+ (* 1/2 (+ (log (* 8 (/ (* (pow b 4) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 x-scale 2) (pow y-scale 2))))) (* 4 (log a)))) (* 1/2 (/ (* (pow a 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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/2 (+ (log (* 8 (/ (* (pow b 4) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 x-scale 2) (pow y-scale 2))))) (* 4 (log a)))) (* (pow a 2) (+ (* 1/48 (* (pow a 2) (+ (* -12 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* -12 (/ (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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2)))))) (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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/2 (+ (log (* 8 (/ (* (pow b 4) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 x-scale 2) (pow y-scale 2))))) (* 4 (log a)))) (* (pow a 2) (+ (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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/1440 (* (pow a 2) (+ (* 180 (* (/ (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (+ (* 240 (/ (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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) 3) (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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))) (* 360 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2)))))))) (* 1/48 (+ (* -12 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* -12 (/ (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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2))))))))))>
#<alt (* 1/2 (+ (log (* 8 (/ (* (pow b 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ 1 a)))))>
#<alt (+ (* 1/2 (+ (log (* 8 (/ (* (pow b 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ 1 a))))) (* 1/2 (/ (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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/48 (/ (+ (* -12 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))) (* -12 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (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))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) 2)))) (pow a 4))) (+ (* 1/2 (+ (log (* 8 (/ (* (pow b 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ 1 a))))) (* 1/2 (/ (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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/1440 (/ (+ (* 180 (* (/ (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (sqrt (/ 1 (pow (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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))))) (+ (* 240 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) 3))) (* 360 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) 2)))))) (pow a 6))) (+ (* 1/48 (/ (+ (* -12 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))) (* -12 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (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))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) 2)))) (pow a 4))) (+ (* 1/2 (+ (log (* 8 (/ (* (pow b 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ 1 a))))) (* 1/2 (/ (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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/2 (+ (log (* 8 (/ (* (pow b 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ -1 a)))))>
#<alt (+ (* 1/2 (+ (log (* 8 (/ (* (pow b 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ -1 a))))) (* 1/2 (/ (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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/48 (/ (+ (* -12 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))) (* -12 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (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))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) 2)))) (pow a 4))) (+ (* 1/2 (+ (log (* 8 (/ (* (pow b 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ -1 a))))) (* 1/2 (/ (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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/1440 (/ (+ (* 180 (* (/ (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (sqrt (/ 1 (pow (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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))))) (+ (* 240 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) 3))) (* 360 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) 2)))))) (pow a 6))) (+ (* 1/48 (/ (+ (* -12 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))) (* -12 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (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))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) 2)))) (pow a 4))) (+ (* 1/2 (+ (log (* 8 (/ (* (pow b 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ -1 a))))) (* 1/2 (/ (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 y-scale 2)))) (* -2 (log x-scale))))>
#<alt (+ (* -1/4 (/ (* (pow x-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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 y-scale 2)))) (* -2 (log x-scale)))))>
#<alt (+ (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 y-scale 2)))) (* -2 (log x-scale)))) (* (pow x-scale 2) (+ (* -1/4 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/48 (* (pow x-scale 2) (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 y-scale 2)))) (* -2 (log x-scale)))) (* (pow x-scale 2) (+ (* -1/4 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/1440 (* (pow x-scale 2) (+ (* -30 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))) 3) (* (pow (+ (* (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) (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))) 3)))) (+ (* 90 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))))))) 4) (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))) 2)))) (* 360 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/48 (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 y-scale 2)))) (* 4 (log (/ 1 x-scale)))))>
#<alt (+ (* -1/4 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 y-scale 2)))) (* 4 (log (/ 1 x-scale))))))>
#<alt (+ (* -1/4 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* 1/48 (/ (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))) (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 y-scale 2)))) (* 4 (log (/ 1 x-scale)))))))>
#<alt (+ (* -1/4 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* 1/1440 (/ (+ (* -30 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))) 3) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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) (pow (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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)))) (+ (* 90 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) 4) (pow (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2)))) (* 360 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))) (+ (* 1/48 (/ (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))) (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 y-scale 2)))) (* 4 (log (/ 1 x-scale))))))))>
#<alt (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 y-scale 2)))) (* 4 (log (/ -1 x-scale)))))>
#<alt (+ (* -1/4 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 y-scale 2)))) (* 4 (log (/ -1 x-scale))))))>
#<alt (+ (* -1/4 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* 1/48 (/ (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))) (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 y-scale 2)))) (* 4 (log (/ -1 x-scale)))))))>
#<alt (+ (* -1/4 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* 1/1440 (/ (+ (* -30 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))) 3) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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) (pow (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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)))) (+ (* 90 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) 4) (pow (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2)))) (* 360 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))) (+ (* 1/48 (/ (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))) (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 y-scale 2)))) (* 4 (log (/ -1 x-scale))))))))>
#<alt (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (* -2 (log y-scale))))>
#<alt (+ (* -1/4 (/ (* (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))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (* -2 (log y-scale)))))>
#<alt (+ (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (* -2 (log y-scale)))) (* (pow y-scale 2) (+ (* -1/4 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/48 (* (pow y-scale 2) (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (* -2 (log y-scale)))) (* (pow y-scale 2) (+ (* -1/4 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/1440 (* (pow y-scale 2) (+ (* -30 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))) 3) (* (pow (+ (* (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) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))) 3)))) (+ (* 90 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))))))) 4) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))) 2)))) (* 360 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))))))) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/48 (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (* 4 (log (/ 1 y-scale)))))>
#<alt (+ (* -1/4 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (* 4 (log (/ 1 y-scale))))))>
#<alt (+ (* -1/4 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/48 (/ (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))) (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (* 4 (log (/ 1 y-scale)))))))>
#<alt (+ (* -1/4 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/1440 (/ (+ (* -30 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))) 3) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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) (pow (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))) 3)))) (+ (* 90 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) 4) (pow (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))) 2)))) (* 360 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))) (+ (* 1/48 (/ (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))) (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (* 4 (log (/ 1 y-scale))))))))>
#<alt (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (* 4 (log (/ -1 y-scale)))))>
#<alt (+ (* -1/4 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (* 4 (log (/ -1 y-scale))))))>
#<alt (+ (* -1/4 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/48 (/ (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))) (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (* 4 (log (/ -1 y-scale)))))))>
#<alt (+ (* -1/4 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/1440 (/ (+ (* -30 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))) 3) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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) (pow (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))) 3)))) (+ (* 90 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) 4) (pow (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))) 2)))) (* 360 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))) (+ (* 1/48 (/ (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))) (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (* 4 (log (/ -1 y-scale))))))))>
#<alt (* 1/2 (log (* 16 (/ (* (pow a 6) (pow b 4)) (* (pow x-scale 2) (pow y-scale 4))))))>
#<alt (+ (* 1/4 (/ (* (pow angle 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)))))))) (pow a 2))) (* 1/2 (log (* 16 (/ (* (pow a 6) (pow b 4)) (* (pow x-scale 2) (pow y-scale 4)))))))>
#<alt (+ (* 1/2 (log (* 16 (/ (* (pow a 6) (pow b 4)) (* (pow x-scale 2) (pow y-scale 4)))))) (* (pow angle 2) (+ (* 1/48 (* (pow angle 2) (+ (* -3 (/ (* (pow y-scale 4) (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 4))) (* 12 (/ (* (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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (pow a 2)))))) (* 1/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 x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 a 2))))))>
#<alt (+ (* 1/2 (log (* 16 (/ (* (pow a 6) (pow b 4)) (* (pow x-scale 2) (pow y-scale 4)))))) (* (pow angle 2) (+ (* 1/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 x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 a 2))) (* (pow angle 2) (+ (* 1/1440 (* (pow angle 2) (+ (* -180 (/ (* (pow y-scale 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)))))) (- (+ (* -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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 4))) (+ (* 30 (/ (* (pow y-scale 6) (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)))))) 3)) (pow a 6))) (* 360 (/ (* (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 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 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/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))))) (/ (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (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)))))) (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (pow a 2))))))) (* 1/48 (+ (* -3 (/ (* (pow y-scale 4) (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 4))) (* 12 (/ (* (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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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))))))))))>
#<alt (* 1/2 (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))) (* (pow x-scale 2) (pow y-scale 2))))))>
#<alt (* 1/2 (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))) (* (pow x-scale 2) (pow y-scale 2))))))>
#<alt (* 1/2 (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))) (* (pow x-scale 2) (pow y-scale 2))))))>
#<alt (* 1/2 (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))) (* (pow x-scale 2) (pow y-scale 2))))))>
#<alt (* 1/2 (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))) (* (pow x-scale 2) (pow y-scale 2))))))>
#<alt (* 1/2 (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))) (* (pow x-scale 2) (pow y-scale 2))))))>
#<alt (* 1/2 (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))) (* (pow x-scale 2) (pow y-scale 2))))))>
#<alt (* 1/2 (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))) (* (pow x-scale 2) (pow y-scale 2))))))>
#<alt (+ (log (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 x-scale 2) (pow y-scale 2))))) (* 4 (log b)))>
#<alt (+ (log (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 x-scale 2) (pow y-scale 2))))) (+ (* 4 (log b)) (/ (* (pow b 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (log (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 x-scale 2) (pow y-scale 2))))) (+ (* 4 (log b)) (* (pow b 2) (- (+ (* 1/24 (* (pow b 2) (+ (* -12 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* -12 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2)))))) (+ (* 1/2 (/ (cos (* 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 a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (pow x-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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (/ (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (log (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 x-scale 2) (pow y-scale 2))))) (+ (* 4 (log b)) (* (pow b 2) (- (+ (* 1/2 (/ (cos (* 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 a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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/720 (* (pow b 2) (+ (* 180 (* (/ (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (+ (* 240 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) 3) (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))) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))) (* 360 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2)))))))) (* 1/24 (+ (* -12 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* -12 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2))))))) (+ (/ 1/2 (* (pow x-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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (/ (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (log (* 8 (/ (* (pow a 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ 1 b))))>
#<alt (- (+ (log (* 8 (/ (* (pow a 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -6 (log (/ 1 b))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow y-scale 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow x-scale 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (/ (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))>
#<alt (- (+ (log (* 8 (/ (* (pow a 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -6 (log (/ 1 b))) (+ (* 1/24 (/ (+ (* -12 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))) (* -12 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (pow (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) 2)))) (pow b 4))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow y-scale 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow x-scale 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (/ (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))>
#<alt (- (+ (log (* 8 (/ (* (pow a 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -6 (log (/ 1 b))) (+ (* 1/720 (/ (+ (* 180 (* (/ (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (sqrt (/ 1 (pow (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (* 240 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) 3))) (* 360 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) 2)))))) (pow b 6))) (+ (* 1/24 (/ (+ (* -12 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))) (* -12 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (pow (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) 2)))) (pow b 4))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow y-scale 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow x-scale 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (/ (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))>
#<alt (+ (log (* 8 (/ (* (pow a 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ -1 b))))>
#<alt (- (+ (log (* 8 (/ (* (pow a 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -6 (log (/ -1 b))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow y-scale 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow x-scale 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (/ (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))>
#<alt (- (+ (log (* 8 (/ (* (pow a 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -6 (log (/ -1 b))) (+ (* 1/24 (/ (+ (* -12 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))) (* -12 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (pow (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) 2)))) (pow b 4))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow y-scale 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow x-scale 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (/ (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))>
#<alt (- (+ (log (* 8 (/ (* (pow a 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -6 (log (/ -1 b))) (+ (* 1/720 (/ (+ (* 180 (* (/ (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (sqrt (/ 1 (pow (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (* 240 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) 3))) (* 360 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) 2)))))) (pow b 6))) (+ (* 1/24 (/ (+ (* -12 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))) (* -12 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (pow (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) 2)))) (pow b 4))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow y-scale 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow x-scale 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (/ (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))>
#<alt (+ (log (* 8 (/ (* (pow b 4) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 x-scale 2) (pow y-scale 2))))) (* 4 (log a)))>
#<alt (+ (log (* 8 (/ (* (pow b 4) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 x-scale 2) (pow y-scale 2))))) (+ (* 4 (log a)) (/ (* (pow a 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (log (* 8 (/ (* (pow b 4) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 x-scale 2) (pow y-scale 2))))) (+ (* 4 (log a)) (* (pow a 2) (- (+ (* 1/24 (* (pow a 2) (+ (* -12 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* -12 (/ (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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow y-scale 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (pow y-scale 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (log (* 8 (/ (* (pow b 4) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 x-scale 2) (pow y-scale 2))))) (+ (* 4 (log a)) (* (pow a 2) (- (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow y-scale 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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/720 (* (pow a 2) (+ (* 180 (* (/ (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (+ (* 240 (/ (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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) 3) (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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))) (* 360 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2)))))))) (* 1/24 (+ (* -12 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* -12 (/ (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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2))))))) (+ (/ 1/2 (* (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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (pow y-scale 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (log (* 8 (/ (* (pow b 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ 1 a))))>
#<alt (- (+ (log (* 8 (/ (* (pow b 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -6 (log (/ 1 a))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* (pow x-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (/ (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* (pow a 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))>
#<alt (- (+ (log (* 8 (/ (* (pow b 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -6 (log (/ 1 a))) (+ (* 1/24 (/ (+ (* -12 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))) (* -12 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (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))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) 2)))) (pow a 4))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* (pow x-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (/ (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* (pow a 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))>
#<alt (- (+ (log (* 8 (/ (* (pow b 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -6 (log (/ 1 a))) (+ (* 1/720 (/ (+ (* 180 (* (/ (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (sqrt (/ 1 (pow (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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))))) (+ (* 240 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) 3))) (* 360 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) 2)))))) (pow a 6))) (+ (* 1/24 (/ (+ (* -12 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))) (* -12 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (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))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) 2)))) (pow a 4))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* (pow x-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (/ (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* (pow a 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))>
#<alt (+ (log (* 8 (/ (* (pow b 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ -1 a))))>
#<alt (- (+ (log (* 8 (/ (* (pow b 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -6 (log (/ -1 a))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* (pow x-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (/ (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* (pow a 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))>
#<alt (- (+ (log (* 8 (/ (* (pow b 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -6 (log (/ -1 a))) (+ (* 1/24 (/ (+ (* -12 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))) (* -12 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (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))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) 2)))) (pow a 4))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* (pow x-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (/ (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* (pow a 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))>
#<alt (- (+ (log (* 8 (/ (* (pow b 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -6 (log (/ -1 a))) (+ (* 1/720 (/ (+ (* 180 (* (/ (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (sqrt (/ 1 (pow (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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))))) (+ (* 240 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) 3))) (* 360 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) 2)))))) (pow a 6))) (+ (* 1/24 (/ (+ (* -12 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))) (* -12 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (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))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) 2)))) (pow a 4))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* (pow x-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (/ (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* (pow a 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))>
#<alt (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 y-scale 2)))) (* -2 (log x-scale)))>
#<alt (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 y-scale 2)))) (+ (* -2 (log x-scale)) (* -1/2 (/ (* (pow x-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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 y-scale 2)))) (+ (* -2 (log x-scale)) (* (pow x-scale 2) (+ (* -1/2 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/24 (* (pow x-scale 2) (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 y-scale 2)))) (+ (* -2 (log x-scale)) (* (pow x-scale 2) (+ (* -1/2 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/720 (* (pow x-scale 2) (+ (* -30 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))) 3) (* (pow (+ (* (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) (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))) 3)))) (+ (* 90 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))))))) 4) (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))) 2)))) (* 360 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/24 (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 y-scale 2)))) (* 4 (log (/ 1 x-scale))))>
#<alt (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 y-scale 2)))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 4 (log (/ 1 x-scale)))))>
#<alt (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 y-scale 2)))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* 1/24 (/ (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))) (* 4 (log (/ 1 x-scale))))))>
#<alt (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 y-scale 2)))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* 1/720 (/ (+ (* -30 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))) 3) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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) (pow (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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)))) (+ (* 90 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) 4) (pow (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2)))) (* 360 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))) (+ (* 1/24 (/ (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))) (* 4 (log (/ 1 x-scale)))))))>
#<alt (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 y-scale 2)))) (* 4 (log (/ -1 x-scale))))>
#<alt (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 y-scale 2)))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 4 (log (/ -1 x-scale)))))>
#<alt (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 y-scale 2)))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* 1/24 (/ (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))) (* 4 (log (/ -1 x-scale))))))>
#<alt (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 y-scale 2)))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* 1/720 (/ (+ (* -30 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))) 3) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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) (pow (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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)))) (+ (* 90 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) 4) (pow (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2)))) (* 360 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))) (+ (* 1/24 (/ (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))) (* 4 (log (/ -1 x-scale)))))))>
#<alt (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (* -2 (log y-scale)))>
#<alt (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (+ (* -2 (log y-scale)) (* -1/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))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (+ (* -2 (log y-scale)) (* (pow y-scale 2) (+ (* -1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/24 (* (pow y-scale 2) (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (+ (* -2 (log y-scale)) (* (pow y-scale 2) (+ (* -1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/720 (* (pow y-scale 2) (+ (* -30 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))) 3) (* (pow (+ (* (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) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))) 3)))) (+ (* 90 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))))))) 4) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))) 2)))) (* 360 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))))))) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/24 (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (* 4 (log (/ 1 y-scale))))>
#<alt (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))))))) (* 4 (log (/ 1 y-scale)))))>
#<alt (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/24 (/ (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))) (* 4 (log (/ 1 y-scale))))))>
#<alt (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/720 (/ (+ (* -30 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))) 3) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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) (pow (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))) 3)))) (+ (* 90 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) 4) (pow (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))) 2)))) (* 360 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))) (+ (* 1/24 (/ (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))) (* 4 (log (/ 1 y-scale)))))))>
#<alt (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (* 4 (log (/ -1 y-scale))))>
#<alt (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))))))) (* 4 (log (/ -1 y-scale)))))>
#<alt (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/24 (/ (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))) (* 4 (log (/ -1 y-scale))))))>
#<alt (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/720 (/ (+ (* -30 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))) 3) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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) (pow (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))) 3)))) (+ (* 90 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) 4) (pow (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))) 2)))) (* 360 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))) (+ (* 1/24 (/ (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))) (* 4 (log (/ -1 y-scale)))))))>
#<alt (log (* 16 (/ (* (pow a 6) (pow b 4)) (* (pow x-scale 2) (pow y-scale 4)))))>
#<alt (+ (log (* 16 (/ (* (pow a 6) (pow b 4)) (* (pow x-scale 2) (pow y-scale 4))))) (* 1/2 (/ (* (pow angle 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)))))))) (pow a 2))))>
#<alt (+ (log (* 16 (/ (* (pow a 6) (pow b 4)) (* (pow x-scale 2) (pow y-scale 4))))) (* (pow angle 2) (+ (* 1/24 (* (pow angle 2) (+ (* -3 (/ (* (pow y-scale 4) (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 4))) (* 12 (/ (* (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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (pow a 2)))))) (* 1/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))))))) (pow a 2))))))>
#<alt (+ (log (* 16 (/ (* (pow a 6) (pow b 4)) (* (pow x-scale 2) (pow y-scale 4))))) (* (pow angle 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))))))) (pow a 2))) (* (pow angle 2) (+ (* 1/720 (* (pow angle 2) (+ (* -180 (/ (* (pow y-scale 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)))))) (- (+ (* -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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 4))) (+ (* 30 (/ (* (pow y-scale 6) (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)))))) 3)) (pow a 6))) (* 360 (/ (* (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 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 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/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))))) (/ (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (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)))))) (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (pow a 2))))))) (* 1/24 (+ (* -3 (/ (* (pow y-scale 4) (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 4))) (* 12 (/ (* (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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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))))))))))>
#<alt (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))) (* (pow x-scale 2) (pow y-scale 2)))))>
#<alt (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))) (* (pow x-scale 2) (pow y-scale 2)))))>
#<alt (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))) (* (pow x-scale 2) (pow y-scale 2)))))>
#<alt (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))) (* (pow x-scale 2) (pow y-scale 2)))))>
#<alt (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))) (* (pow x-scale 2) (pow y-scale 2)))))>
#<alt (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))) (* (pow x-scale 2) (pow y-scale 2)))))>
#<alt (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))) (* (pow x-scale 2) (pow y-scale 2)))))>
#<alt (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))) (* (pow x-scale 2) (pow y-scale 2)))))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* (pow a 2) (pow b 2))>
#<alt (* (pow a 2) (pow b 2))>
#<alt (* (pow a 2) (pow b 2))>
#<alt (* (pow a 2) (pow b 2))>
#<alt (* (pow a 2) (pow b 2))>
#<alt (* (pow a 2) (pow b 2))>
#<alt (* (pow a 2) (pow b 2))>
#<alt (* (pow a 2) (pow b 2))>
#<alt (* (pow a 2) (pow b 2))>
#<alt (* (pow a 2) (pow b 2))>
#<alt (* (pow a 2) (pow b 2))>
#<alt (* (pow a 2) (pow b 2))>
#<alt (* (pow a 2) (pow b 2))>
#<alt (* (pow a 2) (pow b 2))>
#<alt (* (pow a 2) (pow b 2))>
#<alt (* (pow a 2) (pow b 2))>
#<alt (* (pow a 2) (pow b 2))>
#<alt (* (pow a 2) (pow b 2))>
#<alt (* (pow a 2) (pow b 2))>
#<alt (* (pow a 2) (pow b 2))>
#<alt (* (pow a 2) (pow b 2))>
#<alt (* (pow a 2) (pow b 2))>
#<alt (* (pow a 2) (pow b 2))>
#<alt (* (pow a 2) (pow b 2))>
#<alt (* 4 (* a (pow b 2)))>
#<alt (* 4 (* a (pow b 2)))>
#<alt (* 4 (* a (pow b 2)))>
#<alt (* 4 (* a (pow b 2)))>
#<alt (* 4 (* a (pow b 2)))>
#<alt (* 4 (* a (pow b 2)))>
#<alt (* 4 (* a (pow b 2)))>
#<alt (* 4 (* a (pow b 2)))>
#<alt (* 4 (* a (pow b 2)))>
#<alt (* 4 (* a (pow b 2)))>
#<alt (* 4 (* a (pow b 2)))>
#<alt (* 4 (* a (pow b 2)))>
#<alt (* 4 (* a (pow b 2)))>
#<alt (* 4 (* a (pow b 2)))>
#<alt (* 4 (* a (pow b 2)))>
#<alt (* 4 (* a (pow b 2)))>
#<alt (* 4 (* a (pow b 2)))>
#<alt (* 4 (* a (pow b 2)))>
#<alt (* 4 (* a (pow b 2)))>
#<alt (* 4 (* a (pow b 2)))>
#<alt (* 4 (* a (pow b 2)))>
#<alt (* 4 (* a (pow b 2)))>
#<alt (* 4 (* a (pow b 2)))>
#<alt (* 4 (* a (pow b 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))))>
#<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

186 calls:

TimeVariablePointExpression
183.0ms
angle
@inf
(* (log (* (/ (* (* b a) (* b (* a 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a))))) (+ (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (- (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale)))))))))) 1/2)
51.0ms
angle
@-inf
(* (log (* (/ (* (* b a) (* b (* a 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a))))) (+ (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (- (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale)))))))))) 1/2)
19.0ms
x-scale
@inf
(* (log (* (/ (* (* b a) (* b (* a 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a))))) (+ (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (- (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale)))))))))) 1/2)
14.0ms
y-scale
@0
(* (log (* (/ (* (* b a) (* b (* a 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a))))) (+ (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (- (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale)))))))))) 1/2)
14.0ms
y-scale
@inf
(* (log (* (/ (* (* b a) (* b (* a 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a))))) (+ (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (- (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale)))))))))) 1/2)

rewrite317.0ms (0.5%)

Algorithm
batch-egg-rewrite
Rules
4908×*-lowering-*.f32
4908×*-lowering-*.f64
3366×/-lowering-/.f32
3366×/-lowering-/.f64
1176×fma-lowering-fma.f32
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
0981115
1574902
26200902
08006902
Stop Event
iter limit
node limit
Counts
25 → 381
Calls
Call 1
Inputs
(* (* a x-scale) 1)
(* a x-scale)
(* (* 1/4 (* a x-scale)) 4)
(* 1/4 (* a x-scale))
(/ (* (/ a (* x-scale y-scale)) (/ (* a (* a (* (* b b) 4))) y-scale)) (/ (* 4 (* a (* b (* b a)))) (* x-scale (* y-scale (* x-scale y-scale)))))
(* (/ a (* x-scale y-scale)) (/ (* a (* a (* (* b b) 4))) y-scale))
(/ a (* x-scale y-scale))
(* 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)) (* -1/2 (/ (* (* (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))))))
(sqrt (+ (/ (pow (cos (* 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 (sin (* 1/180 (* angle (PI)))) 2)))))
(+ (/ (pow (cos (* 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 (sin (* 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) (pow (sin (* 1/180 (* angle (PI)))) 2)))
(/ (exp (* (log (* (/ (* (* b a) (* b (* a 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a))))) (+ (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (- (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale)))))))))) 1/2)) (/ (* 4 (* a (* b (* b a)))) (* x-scale (* y-scale (* x-scale y-scale)))))
(exp (* (log (* (/ (* (* b a) (* b (* a 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a))))) (+ (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (- (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale)))))))))) 1/2))
(* (log (* (/ (* (* b a) (* b (* a 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a))))) (+ (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (- (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale)))))))))) 1/2)
(log (* (/ (* (* b a) (* b (* a 8))) (/ (* x-scale (* x-scale (* y-scale y-scale))) (* b (* a (* b a))))) (+ (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (- (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)) (sqrt (+ (* (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale))) (- (/ (+ (* (* a a) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180)))))) (* (* b b) (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* x-scale x-scale)) (/ (+ (* a (* a (+ 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* (* b b) (- 1/2 (* 1/2 (cos (* 2 (/ (* angle (PI)) 180))))))) (* y-scale y-scale)))) (* (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))) (* (- (* b b) (* a a)) (/ (sin (* 2 (/ (* angle (PI)) 180))) (* x-scale y-scale))))))))))
(* 4 (* a (* b (* b a))))
(* a (* a (* (* b b) 4)))
(* a (* b (* b a)))
(* a (* (* b b) 4))
(PI)
(cos (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sqrt 8)
(cos (* 2 (/ (* angle (PI)) 180)))
Outputs
(*.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 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 a #s(literal 4 binary64))))
(*.f64 (*.f64 x-scale (*.f64 a #s(literal 1/4 binary64))) #s(literal 4 binary64))
(*.f64 #s(literal 4 binary64) (*.f64 x-scale (*.f64 a #s(literal 1/4 binary64))))
(*.f64 (*.f64 a #s(literal 1/4 binary64)) (*.f64 x-scale #s(literal 4 binary64)))
(*.f64 (*.f64 x-scale (*.f64 a #s(literal 4 binary64))) #s(literal 1/4 binary64))
(*.f64 (*.f64 #s(literal 1 binary64) a) x-scale)
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a #s(literal 1/4 binary64))) 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 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 a #s(literal 4 binary64))))
(*.f64 (*.f64 x-scale (*.f64 a #s(literal 1/4 binary64))) #s(literal 4 binary64))
(*.f64 #s(literal 4 binary64) (*.f64 x-scale (*.f64 a #s(literal 1/4 binary64))))
(*.f64 (*.f64 a #s(literal 1/4 binary64)) (*.f64 x-scale #s(literal 4 binary64)))
(*.f64 (*.f64 x-scale (*.f64 a #s(literal 4 binary64))) #s(literal 1/4 binary64))
(*.f64 (*.f64 #s(literal 1 binary64) a) x-scale)
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a #s(literal 1/4 binary64))) 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 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 a #s(literal 4 binary64))))
(*.f64 (*.f64 x-scale (*.f64 a #s(literal 1/4 binary64))) #s(literal 4 binary64))
(*.f64 #s(literal 4 binary64) (*.f64 x-scale (*.f64 a #s(literal 1/4 binary64))))
(*.f64 (*.f64 a #s(literal 1/4 binary64)) (*.f64 x-scale #s(literal 4 binary64)))
(*.f64 (*.f64 x-scale (*.f64 a #s(literal 4 binary64))) #s(literal 1/4 binary64))
(*.f64 (*.f64 #s(literal 1 binary64) a) x-scale)
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a #s(literal 1/4 binary64))) x-scale)
(*.f64 a (*.f64 x-scale #s(literal 1/4 binary64)))
(*.f64 x-scale (*.f64 a #s(literal 1/4 binary64)))
(*.f64 (*.f64 a x-scale) #s(literal 1/4 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 a #s(literal 1/4 binary64))))
(*.f64 #s(literal 1/4 binary64) (*.f64 a x-scale))
(*.f64 (*.f64 x-scale (*.f64 a #s(literal 1/4 binary64))) #s(literal 1 binary64))
(*.f64 (*.f64 a #s(literal 1/4 binary64)) x-scale)
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) a)
(neg.f64 (/.f64 (*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) a) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b b))) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(neg.f64 (/.f64 (/.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) (-.f64 #s(literal 0 binary64) y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 (*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) a) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 (*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) a) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) #s(literal 1 binary64)))
(/.f64 (*.f64 a (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (/.f64 (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(/.f64 (*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) a) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (/.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) (-.f64 #s(literal 0 binary64) y-scale)) (/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b b))) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) y-scale))
(/.f64 (*.f64 (*.f64 a a) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(/.f64 (*.f64 (*.f64 a a) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 x-scale y-scale)))
(/.f64 (/.f64 (*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) a) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 (*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) a) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) a) (*.f64 a (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 a (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale))) (*.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) #s(literal 1 binary64)) (*.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(/.f64 (neg.f64 (/.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) (-.f64 #s(literal 0 binary64) y-scale))) (/.f64 (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) a) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) #s(literal 1 binary64)) (/.f64 (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 a (/.f64 (*.f64 a (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) (*.f64 x-scale y-scale))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) (/.f64 (*.f64 x-scale y-scale) a))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) a) (/.f64 (*.f64 a (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) (-.f64 #s(literal 0 binary64) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 a (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) y-scale)
(/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (/.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 y-scale (*.f64 x-scale y-scale)))))) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) (/.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 y-scale (*.f64 x-scale y-scale)))))) y-scale)
(/.f64 (*.f64 (*.f64 (*.f64 a a) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (/.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 y-scale (*.f64 x-scale y-scale)))))) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) a) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))))
(/.f64 (/.f64 (*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) a) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) #s(literal 4 binary64)) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (/.f64 (*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) a) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (/.f64 #s(literal 4 binary64) x-scale)) (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 b b)) y-scale)))
(pow.f64 (/.f64 (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 (*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) a) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) #s(literal -1 binary64))
(*.f64 a (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (/.f64 (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 a (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 y-scale (*.f64 x-scale y-scale)))))))
(*.f64 (*.f64 a (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) a) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (/.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) a) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))))))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) (-.f64 #s(literal 0 binary64) y-scale)) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b b))) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 y-scale (*.f64 x-scale y-scale))))) (*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) a) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)))
(*.f64 (/.f64 (*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) a) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (/.f64 a (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (/.f64 (*.f64 a (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (/.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (*.f64 a (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 b b)) y-scale))))
(*.f64 (/.f64 (*.f64 a (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) #s(literal 4 binary64)) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (/.f64 (*.f64 a (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 b b)) y-scale))))
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) a) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))))) x-scale) (*.f64 y-scale (*.f64 x-scale y-scale)))
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) a) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale))
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) a) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) a) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))))) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)
(*.f64 (/.f64 (*.f64 a (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))))) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (/.f64 (*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) a) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) #s(literal 1 binary64)) (/.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (/.f64 (*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) a) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (*.f64 (*.f64 a (*.f64 a (*.f64 b b))) #s(literal -4 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 (*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) a) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (*.f64 (*.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 a (*.f64 b b)) x-scale))) (*.f64 y-scale (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))))) (/.f64 (*.f64 a (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (/.f64 (/.f64 y-scale a) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (/.f64 y-scale a) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))))))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 a a) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale))))
(/.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (/.f64 y-scale a) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))))
(/.f64 (*.f64 a (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (/.f64 (*.f64 x-scale y-scale) a))
(/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) y-scale)
(/.f64 (*.f64 (*.f64 a a) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) a) (*.f64 a (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale))) (-.f64 #s(literal 0 binary64) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 a (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale))) y-scale)
(/.f64 (*.f64 a #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (/.f64 (/.f64 y-scale a) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))))))
(/.f64 (*.f64 a (*.f64 (*.f64 a (*.f64 a (*.f64 b b))) #s(literal -4 binary64))) (*.f64 (*.f64 x-scale y-scale) (-.f64 #s(literal 0 binary64) y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))))) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) y-scale))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 a (*.f64 a (*.f64 b b))) #s(literal -4 binary64))) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (-.f64 #s(literal 0 binary64) y-scale)))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) a) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 x-scale y-scale)) (/.f64 (/.f64 y-scale a) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) a) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 x-scale y-scale)) y-scale))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) a) (*.f64 (*.f64 a (*.f64 a (*.f64 b b))) #s(literal -4 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 x-scale y-scale)) (-.f64 #s(literal 0 binary64) y-scale)))
(/.f64 (*.f64 (/.f64 a x-scale) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 (/.f64 y-scale a) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))))))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))))) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 (*.f64 a (*.f64 a (*.f64 b b))) #s(literal -4 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) a) (*.f64 (/.f64 (/.f64 y-scale a) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) a)) (*.f64 (/.f64 (/.f64 y-scale a) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (-.f64 #s(literal 0 binary64) (*.f64 x-scale y-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 a x-scale)) (*.f64 (/.f64 (/.f64 y-scale a) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) y-scale))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (-.f64 #s(literal 0 binary64) a)) (*.f64 y-scale (-.f64 #s(literal 0 binary64) (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (/.f64 a x-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b b))) #s(literal -4 binary64)) a) (*.f64 (-.f64 #s(literal 0 binary64) y-scale) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b b))) #s(literal -4 binary64)) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) y-scale) (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (*.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b b))) #s(literal -4 binary64)) (-.f64 #s(literal 0 binary64) a)) (*.f64 (-.f64 #s(literal 0 binary64) y-scale) (-.f64 #s(literal 0 binary64) (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b b))) #s(literal -4 binary64)) (/.f64 a x-scale)) (-.f64 #s(literal 0 binary64) (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale))) (-.f64 #s(literal 0 binary64) y-scale))
(/.f64 (neg.f64 (*.f64 (*.f64 a a) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale))) (-.f64 #s(literal 0 binary64) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (/.f64 (/.f64 y-scale a) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 (*.f64 a (*.f64 a (*.f64 b b))) #s(literal -4 binary64))) (-.f64 #s(literal 0 binary64) y-scale))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale y-scale) a))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (-.f64 #s(literal 0 binary64) a)) (-.f64 #s(literal 0 binary64) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (/.f64 a x-scale)) y-scale)
(/.f64 (*.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b b))) #s(literal -4 binary64)) (/.f64 a (*.f64 x-scale y-scale))) (-.f64 #s(literal 0 binary64) y-scale))
(/.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) x-scale) (*.f64 y-scale y-scale))
(/.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 y-scale y-scale)) x-scale)
(/.f64 (/.f64 (*.f64 (*.f64 a a) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) x-scale) y-scale)
(/.f64 (/.f64 (*.f64 (*.f64 a a) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) y-scale) x-scale)
(*.f64 a (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (*.f64 a (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale))))
(*.f64 a (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 a (/.f64 (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 a (/.f64 (*.f64 a (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 a (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)))
(*.f64 (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (*.f64 a (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (*.f64 (*.f64 a a) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 a x-scale) (/.f64 (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 a x-scale) (/.f64 (*.f64 a (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) y-scale))
(*.f64 (/.f64 a (*.f64 y-scale y-scale)) (*.f64 (*.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 a (*.f64 b b)) x-scale)))
(*.f64 (/.f64 a y-scale) (/.f64 (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 a y-scale) (/.f64 (*.f64 a (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) x-scale))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) a) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale))
(neg.f64 (/.f64 a (-.f64 #s(literal 0 binary64) (*.f64 x-scale y-scale))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) a) (*.f64 x-scale y-scale)))
(/.f64 a (*.f64 x-scale y-scale))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) a))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 x-scale y-scale) a) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 a x-scale)))
(/.f64 (-.f64 #s(literal 0 binary64) a) (-.f64 #s(literal 0 binary64) (*.f64 x-scale y-scale)))
(/.f64 (/.f64 a x-scale) y-scale)
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (*.f64 a #s(literal 1 binary64)) (*.f64 x-scale y-scale))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) a)) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (/.f64 a x-scale)) (-.f64 #s(literal 0 binary64) y-scale))
(/.f64 (/.f64 a y-scale) x-scale)
(pow.f64 (/.f64 (*.f64 x-scale y-scale) a) #s(literal -1 binary64))
(*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 #s(literal 1 binary64) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (-.f64 #s(literal 0 binary64) a) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 x-scale y-scale))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)
(*.f64 (/.f64 a x-scale) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 x-scale y-scale)
(*.f64 y-scale x-scale)
(*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))))
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.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 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))))
(*.f64 b (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))))
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))))
(*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (sqrt.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #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 #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 b (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))
(*.f64 (sqrt.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))))
(*.f64 (*.f64 x-scale (*.f64 #s(literal 1/4 binary64) b)) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))))
(*.f64 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))) (*.f64 #s(literal 1/4 binary64) b))
(*.f64 (*.f64 (sqrt.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) #s(literal 1/4 binary64)) (*.f64 b (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))
(*.f64 (*.f64 (sqrt.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (*.f64 #s(literal 1/4 binary64) b)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(*.f64 (*.f64 (sqrt.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (*.f64 x-scale (*.f64 #s(literal 1/4 binary64) b))) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
(exp.f64 (*.f64 (log.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) #s(literal 1/2 binary64)))
(sqrt.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))
(/.f64 (hypot.f64 (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 x-scale x-scale)) #s(literal 3/2 binary64)) (pow.f64 (/.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 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) #s(literal 3/2 binary64))) (sqrt.f64 (+.f64 (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 x-scale x-scale)) #s(literal 2 binary64)) (*.f64 (/.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 x-scale x-scale) (+.f64 #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 #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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #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 #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 x-scale x-scale)))))))
(/.f64 (sqrt.f64 (-.f64 (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 x-scale x-scale)) #s(literal 2 binary64)) (pow.f64 (/.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 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) #s(literal 2 binary64)))) (sqrt.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))
(pow.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) #s(literal 1/2 binary64))
(*.f64 (pow.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) #s(literal 1/4 binary64)) (pow.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) #s(literal 1/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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #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 #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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #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 #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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #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 #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 #s(literal 0 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (/.f64 (-.f64 #s(literal 0 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 x-scale x-scale)))
(-.f64 (/.f64 (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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 (pow.f64 (/.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 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) #s(literal 2 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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #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 #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 (*.f64 #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 x-scale x-scale) (+.f64 #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 #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 x-scale x-scale)))
(fma.f64 (/.f64 (*.f64 #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 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (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 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-scale)))
(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 #s(literal 1 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (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 x-scale x-scale)) #s(literal 2 binary64)) (*.f64 (/.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 x-scale x-scale) (+.f64 #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 #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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #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 #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 x-scale x-scale))))) (+.f64 (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 x-scale x-scale)) #s(literal 3 binary64)) (pow.f64 (/.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 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (-.f64 (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 x-scale x-scale)) #s(literal 2 binary64)) (pow.f64 (/.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 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) #s(literal 2 binary64)))))
(/.f64 (+.f64 (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 x-scale x-scale)) #s(literal 3 binary64)) (pow.f64 (/.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 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) #s(literal 3 binary64))) (+.f64 (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 x-scale x-scale)) #s(literal 2 binary64)) (*.f64 (/.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 x-scale x-scale) (+.f64 #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 #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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #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 #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 x-scale x-scale))))))
(/.f64 (+.f64 (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 x-scale x-scale)) #s(literal 3 binary64)) (pow.f64 (/.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 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.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 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) #s(literal 2 binary64)) (-.f64 (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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.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 x-scale x-scale) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 #s(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 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (pow.f64 (/.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 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) #s(literal 2 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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #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 #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 #s(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 x-scale x-scale) (+.f64 #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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #s(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 x-scale x-scale) (+.f64 #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 #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 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.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 x-scale x-scale) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (*.f64 (*.f64 x-scale x-scale) (+.f64 #s(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 0 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 #s(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 x-scale x-scale)) (*.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 x-scale x-scale) (+.f64 #s(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 x-scale x-scale)) (+.f64 #s(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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) x-scale) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 x-scale (*.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 x-scale x-scale) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (*.f64 x-scale (+.f64 #s(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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #s(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))))) #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 x-scale x-scale) (+.f64 #s(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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (*.f64 x-scale x-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 #s(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 x-scale x-scale)))
(/.f64 (+.f64 (*.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 x-scale x-scale) (+.f64 #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 x-scale x-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 #s(literal 0 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/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 x-scale x-scale))))
(/.f64 (+.f64 (*.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 x-scale x-scale) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) x-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 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) x-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))))) x-scale))
(/.f64 (neg.f64 (+.f64 (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 x-scale x-scale)) #s(literal 3 binary64)) (pow.f64 (/.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 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (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 x-scale x-scale)) #s(literal 2 binary64)) (*.f64 (/.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 x-scale x-scale) (+.f64 #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 #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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #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 #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 x-scale x-scale)))))))
(/.f64 (neg.f64 (-.f64 (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 x-scale x-scale)) #s(literal 2 binary64)) (pow.f64 (/.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 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) #s(literal 2 binary64)))) (neg.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))
(/.f64 (-.f64 (pow.f64 (/.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 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) #s(literal 2 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 x-scale x-scale)) #s(literal 2 binary64))) (-.f64 (/.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 x-scale x-scale) (+.f64 #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 #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 x-scale x-scale))))
(*.f64 (+.f64 (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 x-scale x-scale)) #s(literal 3 binary64)) (pow.f64 (/.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 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (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 x-scale x-scale)) #s(literal 2 binary64)) (*.f64 (/.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 x-scale x-scale) (+.f64 #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 #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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #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 #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 x-scale x-scale)))))))
(*.f64 (-.f64 (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 x-scale x-scale)) #s(literal 2 binary64)) (pow.f64 (/.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 x-scale x-scale) (+.f64 #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 #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 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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))
(/.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 #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 x-scale x-scale) (+.f64 #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 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 #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 x-scale x-scale) (+.f64 #s(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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))
(/.f64 (neg.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 x-scale x-scale) (+.f64 #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 #s(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 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.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 0 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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.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 -1/2 binary64)) (-.f64 #s(literal 0 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 #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 x-scale x-scale) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))))
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 #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 x-scale x-scale) (+.f64 #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 #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 x-scale x-scale) (+.f64 #s(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 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)))))) #s(literal -1/2 binary64)))
(*.f64 (*.f64 #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 x-scale x-scale) (+.f64 #s(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 #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/2 binary64)))
(*.f64 (/.f64 (*.f64 #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 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) #s(literal -1/2 binary64))
(*.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 x-scale x-scale) (+.f64 #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 #s(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) (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (/.f64 (*.f64 #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 x-scale x-scale) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #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 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)))))))
(neg.f64 (/.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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a)) (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64)))))))) (/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b b))) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a)) (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64))))))))) (/.f64 (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a)) (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a)) (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64))))))))) #s(literal 1 binary64)))
(/.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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a)) (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64)))))))) (/.f64 (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (-.f64 #s(literal 0 binary64) (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a)) (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64))))))))) (/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b b))) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (/.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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a)) (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64)))))))) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a)) (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64)))))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a)) (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64)))))))))) (/.f64 (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a)) (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64)))))))) #s(literal 1 binary64)) (/.f64 (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a)) (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64)))))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))))
(/.f64 (/.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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a)) (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64)))))))) #s(literal 4 binary64)) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (/.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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a)) (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64)))))))) (/.f64 #s(literal 4 binary64) x-scale)) (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 b b)) y-scale)))
(pow.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a)) (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64))))))))) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (/.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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a)) (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64)))))))) (/.f64 (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a)) (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64)))))))) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))))))
(*.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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a)) (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64)))))))) (/.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (-.f64 #s(literal 0 binary64) (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a)) (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64))))))))) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 b b))) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 y-scale (*.f64 x-scale y-scale))))) (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a)) (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64)))))))))
(*.f64 (/.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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a)) (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64)))))))) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 (/.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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a)) (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64)))))))) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))))) x-scale) (*.f64 y-scale (*.f64 x-scale y-scale)))
(*.f64 (*.f64 (/.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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a)) (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64)))))))) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale))
(*.f64 (*.f64 (/.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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a)) (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64)))))))) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))))) (*.f64 x-scale 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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a)) (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64)))))))) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))))) (*.f64 y-scale (*.f64 x-scale y-scale))) x-scale)
(*.f64 (/.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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a)) (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64)))))))) #s(literal 1 binary64)) (/.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (/.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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a)) (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64)))))))) (*.f64 (*.f64 a (*.f64 a (*.f64 b b))) #s(literal -4 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a)) (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64)))))))) (*.f64 (*.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 a (*.f64 b b)) x-scale))) (*.f64 y-scale (*.f64 x-scale y-scale)))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.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 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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a)) (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64))))))))))
(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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a)) (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64))))))))
(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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a)) (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64))))))) #s(literal 1/2 binary64))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.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 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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a)) (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64)))))))))
(*.f64 (pow.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64))))) (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a))) #s(literal 1/2 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))))) #s(literal 1/2 binary64)))
(*.f64 (pow.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 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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))))) #s(literal 1/2 binary64)) (pow.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64))))) (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a))) #s(literal 1/2 binary64)))
(*.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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a)) (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64))))))) #s(literal 1/4 binary64)) (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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a)) (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64))))))) #s(literal 1/4 binary64)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64))))) (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a))))) (*.f64 #s(literal 1/2 binary64) (log.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 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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))))))))
(+.f64 (*.f64 (log.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64))))) (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a)))) #s(literal 1/2 binary64)) (*.f64 (log.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 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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale)))))) #s(literal 1/2 binary64)))
(*.f64 #s(literal 1/2 binary64) (log.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 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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a)) (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64)))))))))
(*.f64 (log.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 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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a)) (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64)))))))) #s(literal 1/2 binary64))
(log.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 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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a)) (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64))))))))
(+.f64 (log.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64))))) (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a)))) (log.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 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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale)))))))
(+.f64 (log.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 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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale)))))) (log.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64))))) (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a)))))
(-.f64 (log.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 b (*.f64 a #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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))))))) (log.f64 (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a))))
(/.f64 (+.f64 (pow.f64 (log.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64))))) (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a)))) #s(literal 3 binary64)) (pow.f64 (log.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 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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale)))))) #s(literal 3 binary64))) (+.f64 (*.f64 (log.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64))))) (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a)))) (log.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64))))) (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a))))) (-.f64 (*.f64 (log.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 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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale)))))) (log.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 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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))))))) (*.f64 (log.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64))))) (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a)))) (log.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 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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))))))))))
(/.f64 (-.f64 (*.f64 (log.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64))))) (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a)))) (log.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64))))) (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a))))) (*.f64 (log.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 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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale)))))) (log.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 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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale)))))))) (-.f64 (log.f64 (/.f64 (*.f64 b (*.f64 a (*.f64 b (*.f64 a #s(literal 8 binary64))))) (*.f64 (/.f64 x-scale (*.f64 a (*.f64 b b))) (/.f64 (*.f64 y-scale (*.f64 x-scale y-scale)) a)))) (log.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 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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (*.f64 (*.f64 b b) (+.f64 #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)) (hypot.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 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 x-scale x-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 y-scale))) (/.f64 (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) (*.f64 x-scale y-scale))))))))
(*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))))
(*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a (*.f64 b b))))
(*.f64 b (*.f64 (*.f64 a (*.f64 a b)) #s(literal 4 binary64)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (*.f64 a a))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) a)
(*.f64 (*.f64 a b) (*.f64 (*.f64 a b) #s(literal 4 binary64)))
(*.f64 (*.f64 a (*.f64 b b)) (*.f64 a #s(literal 4 binary64)))
(*.f64 (*.f64 a (*.f64 a b)) (*.f64 #s(literal 4 binary64) b))
(*.f64 (*.f64 a (*.f64 a (*.f64 b b))) #s(literal 4 binary64))
(*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 b b)))
(*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 a (*.f64 b b)))
(*.f64 (*.f64 #s(literal 4 binary64) b) (*.f64 a (*.f64 a b)))
(*.f64 (*.f64 (*.f64 a a) #s(literal 4 binary64)) (*.f64 b b))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a b)) (*.f64 a b))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))) b)
(*.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) b) (*.f64 a b))
(*.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 a b)) b)
(*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))))
(*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a (*.f64 b b))))
(*.f64 b (*.f64 (*.f64 a (*.f64 a b)) #s(literal 4 binary64)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (*.f64 a a))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) a)
(*.f64 (*.f64 a b) (*.f64 (*.f64 a b) #s(literal 4 binary64)))
(*.f64 (*.f64 a (*.f64 b b)) (*.f64 a #s(literal 4 binary64)))
(*.f64 (*.f64 a (*.f64 a b)) (*.f64 #s(literal 4 binary64) b))
(*.f64 (*.f64 a (*.f64 a (*.f64 b b))) #s(literal 4 binary64))
(*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 b b)))
(*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 a (*.f64 b b)))
(*.f64 (*.f64 #s(literal 4 binary64) b) (*.f64 a (*.f64 a b)))
(*.f64 (*.f64 (*.f64 a a) #s(literal 4 binary64)) (*.f64 b b))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a b)) (*.f64 a b))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))) b)
(*.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) b) (*.f64 a b))
(*.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 a b)) b)
(pow.f64 (*.f64 a b) #s(literal 2 binary64))
(*.f64 a (*.f64 a (*.f64 b b)))
(*.f64 b (*.f64 a (*.f64 a b)))
(*.f64 (*.f64 b b) (*.f64 a a))
(*.f64 (*.f64 a b) (*.f64 a b))
(*.f64 (*.f64 a (*.f64 b b)) a)
(*.f64 (*.f64 a (*.f64 a b)) b)
(*.f64 (*.f64 a a) (*.f64 b b))
(*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))
(*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))
(*.f64 b (*.f64 (*.f64 #s(literal 4 binary64) b) a))
(*.f64 (*.f64 b b) (*.f64 a #s(literal 4 binary64)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) a)
(*.f64 (*.f64 a b) (*.f64 #s(literal 4 binary64) b))
(*.f64 (*.f64 a (*.f64 b b)) #s(literal 4 binary64))
(*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b))
(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)))
(-.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 #s(literal 1 binary64) (PI.f64))
(*.f64 (PI.f64) #s(literal 1 binary64))
(*.f64 (cbrt.f64 (PI.f64)) (cbrt.f64 (*.f64 (PI.f64) (PI.f64))))
(*.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) (cbrt.f64 (PI.f64)))
(*.f64 (sqrt.f64 (PI.f64)) (sqrt.f64 (PI.f64)))
(*.f64 (pow.f64 (cbrt.f64 (*.f64 (PI.f64) (PI.f64))) #s(literal 1 binary64)) (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1 binary64)))
(*.f64 (*.f64 #s(literal 1 binary64) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)))
(exp.f64 (*.f64 (log.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 1 binary64)))
(cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))
(pow.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) #s(literal 1 binary64))
(*.f64 (pow.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 1 binary64)))
(sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))
(pow.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) #s(literal 1 binary64))
(*.f64 (pow.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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))
(*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/4 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/4 binary64)))
(+.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) (+.f64 (-.f64 #s(literal 0 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 #s(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 #s(literal 0 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)))))))
(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 #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 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (-.f64 #s(literal 0 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)))))))
(fma.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.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) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.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 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 #s(literal 0 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)))))))
(fma.f64 (exp.f64 (log.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))))) (exp.f64 (log.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))))) (-.f64 #s(literal 0 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)))))))
(fma.f64 (+.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1 binary64)) #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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.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/4 binary64) (pow.f64 (*.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 #s(literal 0 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)))))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (pow.f64 (*.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/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 3 binary64)))) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.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 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (-.f64 #s(literal 0 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 (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 3 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 3 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 #s(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 #s(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 #s(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 #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 #s(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 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))
(*.f64 (+.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (-.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))

simplify1.9s (2.8%)

Algorithm
egg-herbie
Rules
7348×*-lowering-*.f32
7348×*-lowering-*.f64
3796×/-lowering-/.f32
3796×/-lowering-/.f64
3348×+-lowering-+.f64
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
02136248612
16720245778
09061245778
Stop Event
iter limit
node limit
Counts
744 → 744
Calls
Call 1
Inputs
(* 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)
(* 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/4 (* a x-scale))
(* 1/4 (* a x-scale))
(* 1/4 (* a x-scale))
(* 1/4 (* a x-scale))
(* 1/4 (* a x-scale))
(* 1/4 (* a x-scale))
(* 1/4 (* a x-scale))
(* 1/4 (* a x-scale))
(* 1/4 (* a x-scale))
(* 1/4 (* a x-scale))
(* 1/4 (* a x-scale))
(* 1/4 (* a x-scale))
(* 1/4 (* a x-scale))
(* 1/4 (* a x-scale))
(* 1/4 (* a x-scale))
(* 1/4 (* a x-scale))
(* 1/4 (* a x-scale))
(* 1/4 (* a x-scale))
(* 1/4 (* a x-scale))
(* 1/4 (* a x-scale))
(* 1/4 (* a x-scale))
(* 1/4 (* a x-scale))
(* 1/4 (* a x-scale))
(* 1/4 (* 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)
(* a x-scale)
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(* x-scale y-scale)
(* x-scale y-scale)
(* x-scale y-scale)
(* x-scale y-scale)
(* x-scale y-scale)
(* x-scale y-scale)
(* x-scale y-scale)
(* x-scale y-scale)
(* x-scale y-scale)
(* x-scale y-scale)
(* x-scale y-scale)
(* x-scale y-scale)
(* x-scale y-scale)
(* x-scale y-scale)
(* x-scale y-scale)
(* x-scale y-scale)
(* x-scale y-scale)
(* x-scale y-scale)
(* x-scale y-scale)
(* x-scale y-scale)
(* x-scale y-scale)
(* x-scale y-scale)
(* x-scale y-scale)
(* x-scale y-scale)
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* -1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* -1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* -1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* -1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 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 x-scale 2)))))))
(* angle (+ (* 1/8 (* (* (pow angle 2) (* b (* x-scale (* y-scale (* (sqrt 8) (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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 (* (* b (* 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 (* (* b (* 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 (* (* b (* x-scale (* y-scale (* (sqrt 8) (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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 (* (* (pow angle 2) (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1 (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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 (* (* b (* 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 (* (* b (* x-scale (* y-scale (* (sqrt 8) (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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 (* (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1 (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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 (* (* (pow angle 2) (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1 (+ (* 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/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 (/ (* (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (- (+ (* -1 (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* angle (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))))
(* angle (+ (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))) (* 1/2 (* (* (pow angle 2) (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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))))))))))
(* angle (+ (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))) (* (pow angle 2) (+ (* 1/2 (* (* (pow angle 2) (- (+ (* -1 (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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/2 (* (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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))))))))))))
(* angle (+ (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))) (* (pow angle 2) (+ (* 1/2 (* (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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/2 (* (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))) (- (+ (* -1 (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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/2 (* (* (pow angle 2) (- (+ (* -1 (+ (* 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/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 (/ (* (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (- (+ (* -1 (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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))))))))))))))
(sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(* -1 (* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* -1 (* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* -1 (* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* -1 (* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 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/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (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 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (+ (* 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/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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/ -1 (pow x-scale 2))
(- (* 1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow x-scale 2))) (/ 1 (pow x-scale 2)))
(- (* (pow angle 2) (+ (* -1 (* (pow angle 2) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))) (/ 1 (pow x-scale 2)))
(- (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2)))))) (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))))))) (/ 1 (pow x-scale 2)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (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 a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (* 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 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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))))) (/ (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (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)))))) (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 (+ (/ (* (pow (sin (* 1/90 (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))))
(* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* 4 (* (/ (* (pow a 2) (* (pow b 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 8)))) (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 2) (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* (/ (* (pow a 2) (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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/2 (* (/ (* (pow a 2) (* (pow b 2) (- (* -4 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 16 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sqrt 8) 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 8)))) (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 8)))) (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* (/ (* (pow a 2) (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* 4 (* (/ (* (pow a 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 8)))) (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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/2 (* (/ (* (pow a 2) (* (pow b 2) (- (* 2 (* (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (* 4 (/ (* (- (* -4 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 16 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sqrt 8) 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sqrt 8) 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 8)))) (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow a 2) (- (* -4 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 16 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sqrt 8) 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 8)))) (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 2) (* (pow b 3) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))
(* (pow b 3) (+ (* 4 (* (/ (* (pow a 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (* (/ (* (pow a 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))))
(* (pow b 3) (+ (* 1/2 (* (/ (* (pow a 2) (- (* -4 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (* 16 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (* (pow (sqrt 8) 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))))) (* (pow b 4) (* x-scale (* y-scale (sqrt 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (+ (* 4 (* (/ (* (pow a 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (* (/ (* (pow a 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))))
(* (pow b 3) (+ (* 1/2 (* (/ (* (pow a 2) (- (* -4 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (* 16 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (* (pow (sqrt 8) 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))))) (* (pow b 4) (* x-scale (* y-scale (sqrt 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (/ (* (pow a 2) (- (* 2 (* (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (* 4 (/ (* (- (* -4 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (* 16 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (* (pow (sqrt 8) 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (sqrt 8) 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))))) (* (pow b 6) (* x-scale (* y-scale (sqrt 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (+ (* 4 (* (/ (* (pow a 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (* (/ (* (pow a 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (/ (* (pow a 2) (* (pow b 3) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (pow b 3) (+ (* 4 (* (/ (* (pow a 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (* (/ (* (pow a 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (pow b 3) (+ (* 1/2 (* (/ (* (pow a 2) (- (* -4 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (* 16 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (* (pow (sqrt 8) 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))))) (* (pow b 4) (* x-scale (* y-scale (sqrt 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (+ (* 4 (* (/ (* (pow a 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (* (/ (* (pow a 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (pow b 3) (+ (* 1/2 (* (/ (* (pow a 2) (- (* -4 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (* 16 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (* (pow (sqrt 8) 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))))) (* (pow b 4) (* x-scale (* y-scale (sqrt 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (/ (* (pow a 2) (- (* 2 (* (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (* 4 (/ (* (- (* -4 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (* 16 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (* (pow (sqrt 8) 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (sqrt 8) 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))))) (* (pow b 6) (* x-scale (* y-scale (sqrt 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (+ (* 4 (* (/ (* (pow a 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (* (/ (* (pow a 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))))))
(* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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) (+ (* 4 (* (/ (* (pow a 2) (* (pow b 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 8)))) (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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 2) (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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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) (+ (* (/ (* (pow b 2) (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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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/2 (* (/ (* (pow a 2) (* (pow b 2) (- (* -4 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 16 (/ (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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sqrt 8) 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 8)))) (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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 8)))) (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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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) (+ (* (/ (* (pow b 2) (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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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) (+ (* 4 (* (/ (* (pow b 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 8)))) (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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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/2 (* (/ (* (pow a 2) (* (pow b 2) (- (* 2 (* (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (* 4 (/ (* (- (* -4 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 16 (/ (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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sqrt 8) 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sqrt 8) 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 8)))) (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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow b 2) (- (* -4 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 16 (/ (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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sqrt 8) 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 8)))) (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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 3) (* (pow b 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))
(* (pow a 3) (+ (* 4 (* (/ (* (pow b 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (* (/ (* (pow b 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))))
(* (pow a 3) (+ (* 1/2 (* (/ (* (pow b 2) (- (* -4 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) (* 16 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (* (pow (sqrt 8) 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))))) (* (pow a 4) (* x-scale (* y-scale (sqrt 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (+ (* 4 (* (/ (* (pow b 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (* (/ (* (pow b 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))))
(* (pow a 3) (+ (* 1/2 (* (/ (* (pow b 2) (- (* -4 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) (* 16 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (* (pow (sqrt 8) 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))))) (* (pow a 4) (* x-scale (* y-scale (sqrt 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (/ (* (pow b 2) (- (* 2 (* (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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))))) (* 4 (/ (* (- (* -4 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) (* 16 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (* (pow (sqrt 8) 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (sqrt 8) 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))))) (* (pow a 6) (* x-scale (* y-scale (sqrt 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (+ (* 4 (* (/ (* (pow b 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (* (/ (* (pow b 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (/ (* (pow a 3) (* (pow b 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (pow a 3) (+ (* 4 (* (/ (* (pow b 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (* (/ (* (pow b 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (pow a 3) (+ (* 1/2 (* (/ (* (pow b 2) (- (* -4 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) (* 16 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (* (pow (sqrt 8) 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))))) (* (pow a 4) (* x-scale (* y-scale (sqrt 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (+ (* 4 (* (/ (* (pow b 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (* (/ (* (pow b 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (pow a 3) (+ (* 1/2 (* (/ (* (pow b 2) (- (* -4 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) (* 16 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (* (pow (sqrt 8) 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))))) (* (pow a 4) (* x-scale (* y-scale (sqrt 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (/ (* (pow b 2) (- (* 2 (* (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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))))) (* 4 (/ (* (- (* -4 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) (* 16 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (* (pow (sqrt 8) 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (sqrt 8) 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))))) (* (pow a 6) (* x-scale (* y-scale (sqrt 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (+ (* 4 (* (/ (* (pow b 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (* (/ (* (pow b 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))))))
(* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))))))))))
(/ (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (* (pow x-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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (* (sqrt 8) (+ (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)
(/ (+ (* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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) (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (* (sqrt 8) (+ (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (* (pow 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 8))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)
(/ (+ (* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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) (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (* (sqrt 8) (+ (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (- (* 4 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))))))))) (* -2 (/ (* (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (* (pow 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 8))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 2) (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (* (pow 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 8))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)
(* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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) (* (pow b 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (* (sqrt 8) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))
(/ (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (* (sqrt 8) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow a 2) (* (pow b 2) (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 8)))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))
(/ (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (* (sqrt 8) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow a 2) (* (pow b 2) (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 8)))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow a 2) (* (pow b 2) (- (* 4 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (* -2 (/ (* (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 8)))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))
(* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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) (* (pow b 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (* (sqrt 8) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))
(/ (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (* (sqrt 8) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow a 2) (* (pow b 2) (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 8)))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))
(/ (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (* (sqrt 8) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow a 2) (* (pow b 2) (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 8)))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow a 2) (* (pow b 2) (- (* 4 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (* -2 (/ (* (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 8)))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))
(* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))))))))))
(/ (+ (* -2 (* (/ (* (pow a 2) (* (pow b 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))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (* (sqrt 8) (+ (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)
(/ (+ (* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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) (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (* (sqrt 8) (+ (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (* (pow 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 8))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)
(/ (+ (* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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) (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (* (sqrt 8) (+ (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (- (* 4 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))))))))) (* -2 (/ (* (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (* (pow 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 8))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 2) (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (* (pow 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 8))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)
(* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))
(/ (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (* (sqrt 8) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))
(/ (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (* (sqrt 8) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 2) (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 8)))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))
(/ (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (* (sqrt 8) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 2) (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 8)))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 2) (- (* 4 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (* -2 (/ (* (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 8)))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))
(* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))
(/ (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (* (sqrt 8) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))
(/ (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (* (sqrt 8) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 2) (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 8)))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))
(/ (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (* (sqrt 8) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 2) (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 8)))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 2) (- (* 4 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (* -2 (/ (* (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 8)))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(+ (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2)))) (/ (* a (* (pow angle 2) (* (pow b 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) x-scale))
(+ (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* a (* (pow angle 2) (* (pow b 2) (- (* 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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 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)))))) x-scale)) (/ (* a (* (pow b 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) x-scale))))
(+ (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2)))) (* (pow angle 2) (+ (* (pow angle 2) (+ (* 1/8 (/ (* a (* (pow angle 2) (* (pow b 2) (- (* 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 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/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))))) (/ (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (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)))))) (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow y-scale 2) (* (- (* 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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 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))) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 a 2))))))) x-scale)) (* 1/8 (/ (* a (* (pow b 2) (- (* 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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 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))))) x-scale)))) (/ (* a (* (pow b 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) x-scale))))
(* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow (sin (* 1/90 (* 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))))))
(* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow (sin (* 1/90 (* 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))))))
(* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow (sin (* 1/90 (* 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))))))
(* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow (sin (* 1/90 (* 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))))))
(* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow (sin (* 1/90 (* 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))))))
(* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow (sin (* 1/90 (* 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))))))
(* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow (sin (* 1/90 (* 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))))))
(* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow (sin (* 1/90 (* 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/2 (+ (log (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 x-scale 2) (pow y-scale 2))))) (* 4 (log b))))
(+ (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 x-scale 2) (pow y-scale 2))))) (* 4 (log b)))) (* 1/2 (/ (* (pow b 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (log (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 x-scale 2) (pow y-scale 2))))) (* 4 (log b)))) (* (pow b 2) (+ (* 1/48 (* (pow b 2) (+ (* -12 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* -12 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2)))))) (* 1/2 (/ (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (log (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 x-scale 2) (pow y-scale 2))))) (* 4 (log b)))) (* (pow b 2) (+ (* 1/2 (/ (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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/1440 (* (pow b 2) (+ (* 180 (* (/ (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (+ (* 240 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) 3) (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))) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))) (* 360 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2)))))))) (* 1/48 (+ (* -12 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* -12 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2))))))))))
(* 1/2 (+ (log (* 8 (/ (* (pow a 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ 1 b)))))
(+ (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ 1 b))))) (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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/48 (/ (+ (* -12 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))) (* -12 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (pow (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) 2)))) (pow b 4))) (+ (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ 1 b))))) (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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/1440 (/ (+ (* 180 (* (/ (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (sqrt (/ 1 (pow (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (* 240 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) 3))) (* 360 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) 2)))))) (pow b 6))) (+ (* 1/48 (/ (+ (* -12 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))) (* -12 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (pow (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) 2)))) (pow b 4))) (+ (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ 1 b))))) (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (log (* 8 (/ (* (pow a 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ -1 b)))))
(+ (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ -1 b))))) (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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/48 (/ (+ (* -12 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))) (* -12 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (pow (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) 2)))) (pow b 4))) (+ (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ -1 b))))) (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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/1440 (/ (+ (* 180 (* (/ (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (sqrt (/ 1 (pow (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (* 240 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) 3))) (* 360 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) 2)))))) (pow b 6))) (+ (* 1/48 (/ (+ (* -12 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))) (* -12 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (pow (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) 2)))) (pow b 4))) (+ (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ -1 b))))) (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (log (* 8 (/ (* (pow b 4) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 x-scale 2) (pow y-scale 2))))) (* 4 (log a))))
(+ (* 1/2 (+ (log (* 8 (/ (* (pow b 4) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 x-scale 2) (pow y-scale 2))))) (* 4 (log a)))) (* 1/2 (/ (* (pow a 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (log (* 8 (/ (* (pow b 4) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 x-scale 2) (pow y-scale 2))))) (* 4 (log a)))) (* (pow a 2) (+ (* 1/48 (* (pow a 2) (+ (* -12 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* -12 (/ (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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2)))))) (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (log (* 8 (/ (* (pow b 4) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 x-scale 2) (pow y-scale 2))))) (* 4 (log a)))) (* (pow a 2) (+ (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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/1440 (* (pow a 2) (+ (* 180 (* (/ (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (+ (* 240 (/ (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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) 3) (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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))) (* 360 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2)))))))) (* 1/48 (+ (* -12 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* -12 (/ (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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2))))))))))
(* 1/2 (+ (log (* 8 (/ (* (pow b 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ 1 a)))))
(+ (* 1/2 (+ (log (* 8 (/ (* (pow b 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ 1 a))))) (* 1/2 (/ (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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/48 (/ (+ (* -12 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))) (* -12 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (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))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) 2)))) (pow a 4))) (+ (* 1/2 (+ (log (* 8 (/ (* (pow b 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ 1 a))))) (* 1/2 (/ (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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/1440 (/ (+ (* 180 (* (/ (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (sqrt (/ 1 (pow (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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))))) (+ (* 240 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) 3))) (* 360 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) 2)))))) (pow a 6))) (+ (* 1/48 (/ (+ (* -12 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))) (* -12 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (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))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) 2)))) (pow a 4))) (+ (* 1/2 (+ (log (* 8 (/ (* (pow b 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ 1 a))))) (* 1/2 (/ (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (log (* 8 (/ (* (pow b 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ -1 a)))))
(+ (* 1/2 (+ (log (* 8 (/ (* (pow b 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ -1 a))))) (* 1/2 (/ (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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/48 (/ (+ (* -12 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))) (* -12 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (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))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) 2)))) (pow a 4))) (+ (* 1/2 (+ (log (* 8 (/ (* (pow b 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ -1 a))))) (* 1/2 (/ (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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/1440 (/ (+ (* 180 (* (/ (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (sqrt (/ 1 (pow (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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))))) (+ (* 240 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) 3))) (* 360 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) 2)))))) (pow a 6))) (+ (* 1/48 (/ (+ (* -12 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))) (* -12 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (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))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) 2)))) (pow a 4))) (+ (* 1/2 (+ (log (* 8 (/ (* (pow b 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ -1 a))))) (* 1/2 (/ (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 y-scale 2)))) (* -2 (log x-scale))))
(+ (* -1/4 (/ (* (pow x-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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 y-scale 2)))) (* -2 (log x-scale)))))
(+ (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 y-scale 2)))) (* -2 (log x-scale)))) (* (pow x-scale 2) (+ (* -1/4 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/48 (* (pow x-scale 2) (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 y-scale 2)))) (* -2 (log x-scale)))) (* (pow x-scale 2) (+ (* -1/4 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/1440 (* (pow x-scale 2) (+ (* -30 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))) 3) (* (pow (+ (* (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) (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))) 3)))) (+ (* 90 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))))))) 4) (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))) 2)))) (* 360 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/48 (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 y-scale 2)))) (* 4 (log (/ 1 x-scale)))))
(+ (* -1/4 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 y-scale 2)))) (* 4 (log (/ 1 x-scale))))))
(+ (* -1/4 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* 1/48 (/ (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))) (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 y-scale 2)))) (* 4 (log (/ 1 x-scale)))))))
(+ (* -1/4 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* 1/1440 (/ (+ (* -30 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))) 3) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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) (pow (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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)))) (+ (* 90 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) 4) (pow (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2)))) (* 360 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))) (+ (* 1/48 (/ (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))) (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 y-scale 2)))) (* 4 (log (/ 1 x-scale))))))))
(* 1/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 y-scale 2)))) (* 4 (log (/ -1 x-scale)))))
(+ (* -1/4 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 y-scale 2)))) (* 4 (log (/ -1 x-scale))))))
(+ (* -1/4 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* 1/48 (/ (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))) (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 y-scale 2)))) (* 4 (log (/ -1 x-scale)))))))
(+ (* -1/4 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* 1/1440 (/ (+ (* -30 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))) 3) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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) (pow (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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)))) (+ (* 90 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) 4) (pow (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2)))) (* 360 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))) (+ (* 1/48 (/ (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))) (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 y-scale 2)))) (* 4 (log (/ -1 x-scale))))))))
(* 1/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (* -2 (log y-scale))))
(+ (* -1/4 (/ (* (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))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (* -2 (log y-scale)))))
(+ (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (* -2 (log y-scale)))) (* (pow y-scale 2) (+ (* -1/4 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/48 (* (pow y-scale 2) (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (* -2 (log y-scale)))) (* (pow y-scale 2) (+ (* -1/4 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/1440 (* (pow y-scale 2) (+ (* -30 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))) 3) (* (pow (+ (* (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) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))) 3)))) (+ (* 90 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))))))) 4) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))) 2)))) (* 360 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))))))) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/48 (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (* 4 (log (/ 1 y-scale)))))
(+ (* -1/4 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (* 4 (log (/ 1 y-scale))))))
(+ (* -1/4 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/48 (/ (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))) (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (* 4 (log (/ 1 y-scale)))))))
(+ (* -1/4 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/1440 (/ (+ (* -30 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))) 3) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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) (pow (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))) 3)))) (+ (* 90 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) 4) (pow (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))) 2)))) (* 360 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))) (+ (* 1/48 (/ (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))) (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (* 4 (log (/ 1 y-scale))))))))
(* 1/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (* 4 (log (/ -1 y-scale)))))
(+ (* -1/4 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (* 4 (log (/ -1 y-scale))))))
(+ (* -1/4 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/48 (/ (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))) (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (* 4 (log (/ -1 y-scale)))))))
(+ (* -1/4 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/1440 (/ (+ (* -30 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))) 3) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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) (pow (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))) 3)))) (+ (* 90 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) 4) (pow (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))) 2)))) (* 360 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))) (+ (* 1/48 (/ (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))) (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (* 4 (log (/ -1 y-scale))))))))
(* 1/2 (log (* 16 (/ (* (pow a 6) (pow b 4)) (* (pow x-scale 2) (pow y-scale 4))))))
(+ (* 1/4 (/ (* (pow angle 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)))))))) (pow a 2))) (* 1/2 (log (* 16 (/ (* (pow a 6) (pow b 4)) (* (pow x-scale 2) (pow y-scale 4)))))))
(+ (* 1/2 (log (* 16 (/ (* (pow a 6) (pow b 4)) (* (pow x-scale 2) (pow y-scale 4)))))) (* (pow angle 2) (+ (* 1/48 (* (pow angle 2) (+ (* -3 (/ (* (pow y-scale 4) (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 4))) (* 12 (/ (* (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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (pow a 2)))))) (* 1/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 x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 a 2))))))
(+ (* 1/2 (log (* 16 (/ (* (pow a 6) (pow b 4)) (* (pow x-scale 2) (pow y-scale 4)))))) (* (pow angle 2) (+ (* 1/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 x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 a 2))) (* (pow angle 2) (+ (* 1/1440 (* (pow angle 2) (+ (* -180 (/ (* (pow y-scale 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)))))) (- (+ (* -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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 4))) (+ (* 30 (/ (* (pow y-scale 6) (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)))))) 3)) (pow a 6))) (* 360 (/ (* (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 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 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/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))))) (/ (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (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)))))) (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (pow a 2))))))) (* 1/48 (+ (* -3 (/ (* (pow y-scale 4) (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 4))) (* 12 (/ (* (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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (pow a 2))))))))))
(* 1/2 (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))) (* (pow x-scale 2) (pow y-scale 2))))))
(* 1/2 (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))) (* (pow x-scale 2) (pow y-scale 2))))))
(* 1/2 (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))) (* (pow x-scale 2) (pow y-scale 2))))))
(* 1/2 (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))) (* (pow x-scale 2) (pow y-scale 2))))))
(* 1/2 (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))) (* (pow x-scale 2) (pow y-scale 2))))))
(* 1/2 (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))) (* (pow x-scale 2) (pow y-scale 2))))))
(* 1/2 (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))) (* (pow x-scale 2) (pow y-scale 2))))))
(* 1/2 (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))) (* (pow x-scale 2) (pow y-scale 2))))))
(+ (log (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 x-scale 2) (pow y-scale 2))))) (* 4 (log b)))
(+ (log (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 x-scale 2) (pow y-scale 2))))) (+ (* 4 (log b)) (/ (* (pow b 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))
(+ (log (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 x-scale 2) (pow y-scale 2))))) (+ (* 4 (log b)) (* (pow b 2) (- (+ (* 1/24 (* (pow b 2) (+ (* -12 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* -12 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2)))))) (+ (* 1/2 (/ (cos (* 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 a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (pow x-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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (/ (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))))))
(+ (log (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 x-scale 2) (pow y-scale 2))))) (+ (* 4 (log b)) (* (pow b 2) (- (+ (* 1/2 (/ (cos (* 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 a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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/720 (* (pow b 2) (+ (* 180 (* (/ (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (+ (* 240 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) 3) (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))) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))) (* 360 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2)))))))) (* 1/24 (+ (* -12 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* -12 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2))))))) (+ (/ 1/2 (* (pow x-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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (/ (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))))))
(+ (log (* 8 (/ (* (pow a 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ 1 b))))
(- (+ (log (* 8 (/ (* (pow a 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -6 (log (/ 1 b))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow y-scale 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow x-scale 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (/ (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))
(- (+ (log (* 8 (/ (* (pow a 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -6 (log (/ 1 b))) (+ (* 1/24 (/ (+ (* -12 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))) (* -12 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (pow (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) 2)))) (pow b 4))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow y-scale 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow x-scale 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (/ (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))
(- (+ (log (* 8 (/ (* (pow a 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -6 (log (/ 1 b))) (+ (* 1/720 (/ (+ (* 180 (* (/ (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (sqrt (/ 1 (pow (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (* 240 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) 3))) (* 360 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) 2)))))) (pow b 6))) (+ (* 1/24 (/ (+ (* -12 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))) (* -12 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (pow (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) 2)))) (pow b 4))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow y-scale 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow x-scale 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (/ (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))
(+ (log (* 8 (/ (* (pow a 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ -1 b))))
(- (+ (log (* 8 (/ (* (pow a 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -6 (log (/ -1 b))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow y-scale 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow x-scale 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (/ (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))
(- (+ (log (* 8 (/ (* (pow a 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -6 (log (/ -1 b))) (+ (* 1/24 (/ (+ (* -12 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))) (* -12 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (pow (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) 2)))) (pow b 4))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow y-scale 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow x-scale 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (/ (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))
(- (+ (log (* 8 (/ (* (pow a 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -6 (log (/ -1 b))) (+ (* 1/720 (/ (+ (* 180 (* (/ (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (sqrt (/ 1 (pow (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (* 240 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) 3))) (* 360 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) 2)))))) (pow b 6))) (+ (* 1/24 (/ (+ (* -12 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))) (* -12 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (pow (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) 2)))) (pow b 4))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow y-scale 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow x-scale 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (/ (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))
(+ (log (* 8 (/ (* (pow b 4) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 x-scale 2) (pow y-scale 2))))) (* 4 (log a)))
(+ (log (* 8 (/ (* (pow b 4) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 x-scale 2) (pow y-scale 2))))) (+ (* 4 (log a)) (/ (* (pow a 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))))))
(+ (log (* 8 (/ (* (pow b 4) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 x-scale 2) (pow y-scale 2))))) (+ (* 4 (log a)) (* (pow a 2) (- (+ (* 1/24 (* (pow a 2) (+ (* -12 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* -12 (/ (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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow y-scale 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (pow y-scale 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))))))
(+ (log (* 8 (/ (* (pow b 4) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 x-scale 2) (pow y-scale 2))))) (+ (* 4 (log a)) (* (pow a 2) (- (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow y-scale 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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/720 (* (pow a 2) (+ (* 180 (* (/ (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (+ (* 240 (/ (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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) 3) (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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))) (* 360 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2)))))))) (* 1/24 (+ (* -12 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* -12 (/ (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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2))))))) (+ (/ 1/2 (* (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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (pow y-scale 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))))))))
(+ (log (* 8 (/ (* (pow b 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ 1 a))))
(- (+ (log (* 8 (/ (* (pow b 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -6 (log (/ 1 a))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* (pow x-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (/ (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* (pow a 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))
(- (+ (log (* 8 (/ (* (pow b 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -6 (log (/ 1 a))) (+ (* 1/24 (/ (+ (* -12 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))) (* -12 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (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))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) 2)))) (pow a 4))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* (pow x-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (/ (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* (pow a 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))
(- (+ (log (* 8 (/ (* (pow b 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -6 (log (/ 1 a))) (+ (* 1/720 (/ (+ (* 180 (* (/ (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (sqrt (/ 1 (pow (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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))))) (+ (* 240 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) 3))) (* 360 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) 2)))))) (pow a 6))) (+ (* 1/24 (/ (+ (* -12 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))) (* -12 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (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))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) 2)))) (pow a 4))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* (pow x-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (/ (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* (pow a 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))
(+ (log (* 8 (/ (* (pow b 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ -1 a))))
(- (+ (log (* 8 (/ (* (pow b 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -6 (log (/ -1 a))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* (pow x-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (/ (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* (pow a 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))
(- (+ (log (* 8 (/ (* (pow b 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -6 (log (/ -1 a))) (+ (* 1/24 (/ (+ (* -12 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))) (* -12 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (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))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) 2)))) (pow a 4))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* (pow x-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (/ (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* (pow a 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))
(- (+ (log (* 8 (/ (* (pow b 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -6 (log (/ -1 a))) (+ (* 1/720 (/ (+ (* 180 (* (/ (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (sqrt (/ 1 (pow (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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))))) (+ (* 240 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) 3))) (* 360 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) 2)))))) (pow a 6))) (+ (* 1/24 (/ (+ (* -12 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))) (* -12 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (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))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) 2)))) (pow a 4))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* (pow x-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (/ (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* (pow a 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))
(+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 y-scale 2)))) (* -2 (log x-scale)))
(+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 y-scale 2)))) (+ (* -2 (log x-scale)) (* -1/2 (/ (* (pow x-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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))))))))
(+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 y-scale 2)))) (+ (* -2 (log x-scale)) (* (pow x-scale 2) (+ (* -1/2 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/24 (* (pow x-scale 2) (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))))))))))))))))))
(+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 y-scale 2)))) (+ (* -2 (log x-scale)) (* (pow x-scale 2) (+ (* -1/2 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/720 (* (pow x-scale 2) (+ (* -30 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))) 3) (* (pow (+ (* (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) (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))) 3)))) (+ (* 90 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))))))) 4) (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))) 2)))) (* 360 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/24 (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))))))))))))))
(+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 y-scale 2)))) (* 4 (log (/ 1 x-scale))))
(+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 y-scale 2)))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 4 (log (/ 1 x-scale)))))
(+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 y-scale 2)))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* 1/24 (/ (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))) (* 4 (log (/ 1 x-scale))))))
(+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 y-scale 2)))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* 1/720 (/ (+ (* -30 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))) 3) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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) (pow (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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)))) (+ (* 90 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) 4) (pow (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2)))) (* 360 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))) (+ (* 1/24 (/ (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))) (* 4 (log (/ 1 x-scale)))))))
(+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 y-scale 2)))) (* 4 (log (/ -1 x-scale))))
(+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 y-scale 2)))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 4 (log (/ -1 x-scale)))))
(+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 y-scale 2)))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* 1/24 (/ (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))) (* 4 (log (/ -1 x-scale))))))
(+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 y-scale 2)))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* 1/720 (/ (+ (* -30 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))) 3) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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) (pow (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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)))) (+ (* 90 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) 4) (pow (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2)))) (* 360 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))) (+ (* 1/24 (/ (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))) (* 4 (log (/ -1 x-scale)))))))
(+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (* -2 (log y-scale)))
(+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (+ (* -2 (log y-scale)) (* -1/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))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))))))))
(+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (+ (* -2 (log y-scale)) (* (pow y-scale 2) (+ (* -1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/24 (* (pow y-scale 2) (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))))))))))))))))))
(+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (+ (* -2 (log y-scale)) (* (pow y-scale 2) (+ (* -1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/720 (* (pow y-scale 2) (+ (* -30 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))) 3) (* (pow (+ (* (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) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))) 3)))) (+ (* 90 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))))))) 4) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))) 2)))) (* 360 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))))))) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/24 (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))))))))))))))
(+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (* 4 (log (/ 1 y-scale))))
(+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))))))) (* 4 (log (/ 1 y-scale)))))
(+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/24 (/ (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))) (* 4 (log (/ 1 y-scale))))))
(+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/720 (/ (+ (* -30 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))) 3) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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) (pow (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))) 3)))) (+ (* 90 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) 4) (pow (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))) 2)))) (* 360 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))) (+ (* 1/24 (/ (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))) (* 4 (log (/ 1 y-scale)))))))
(+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (* 4 (log (/ -1 y-scale))))
(+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))))))) (* 4 (log (/ -1 y-scale)))))
(+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/24 (/ (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))) (* 4 (log (/ -1 y-scale))))))
(+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/720 (/ (+ (* -30 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))) 3) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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) (pow (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))) 3)))) (+ (* 90 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) 4) (pow (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))) 2)))) (* 360 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))) (+ (* 1/24 (/ (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))) (* 4 (log (/ -1 y-scale)))))))
(log (* 16 (/ (* (pow a 6) (pow b 4)) (* (pow x-scale 2) (pow y-scale 4)))))
(+ (log (* 16 (/ (* (pow a 6) (pow b 4)) (* (pow x-scale 2) (pow y-scale 4))))) (* 1/2 (/ (* (pow angle 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)))))))) (pow a 2))))
(+ (log (* 16 (/ (* (pow a 6) (pow b 4)) (* (pow x-scale 2) (pow y-scale 4))))) (* (pow angle 2) (+ (* 1/24 (* (pow angle 2) (+ (* -3 (/ (* (pow y-scale 4) (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 4))) (* 12 (/ (* (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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (pow a 2)))))) (* 1/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))))))) (pow a 2))))))
(+ (log (* 16 (/ (* (pow a 6) (pow b 4)) (* (pow x-scale 2) (pow y-scale 4))))) (* (pow angle 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))))))) (pow a 2))) (* (pow angle 2) (+ (* 1/720 (* (pow angle 2) (+ (* -180 (/ (* (pow y-scale 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)))))) (- (+ (* -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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 4))) (+ (* 30 (/ (* (pow y-scale 6) (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)))))) 3)) (pow a 6))) (* 360 (/ (* (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 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 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/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))))) (/ (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (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)))))) (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (pow a 2))))))) (* 1/24 (+ (* -3 (/ (* (pow y-scale 4) (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 4))) (* 12 (/ (* (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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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))))))))))
(log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))) (* (pow x-scale 2) (pow y-scale 2)))))
(log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))) (* (pow x-scale 2) (pow y-scale 2)))))
(log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))) (* (pow x-scale 2) (pow y-scale 2)))))
(log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))) (* (pow x-scale 2) (pow y-scale 2)))))
(log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))) (* (pow x-scale 2) (pow y-scale 2)))))
(log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))) (* (pow x-scale 2) (pow y-scale 2)))))
(log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))) (* (pow x-scale 2) (pow y-scale 2)))))
(log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))) (* (pow x-scale 2) (pow y-scale 2)))))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* (pow a 2) (pow b 2))
(* 4 (* a (pow b 2)))
(* 4 (* a (pow b 2)))
(* 4 (* a (pow b 2)))
(* 4 (* a (pow b 2)))
(* 4 (* a (pow b 2)))
(* 4 (* a (pow b 2)))
(* 4 (* a (pow b 2)))
(* 4 (* a (pow b 2)))
(* 4 (* a (pow b 2)))
(* 4 (* a (pow b 2)))
(* 4 (* a (pow b 2)))
(* 4 (* a (pow b 2)))
(* 4 (* a (pow b 2)))
(* 4 (* a (pow b 2)))
(* 4 (* a (pow b 2)))
(* 4 (* a (pow b 2)))
(* 4 (* a (pow b 2)))
(* 4 (* a (pow b 2)))
(* 4 (* a (pow b 2)))
(* 4 (* a (pow b 2)))
(* 4 (* a (pow b 2)))
(* 4 (* a (pow b 2)))
(* 4 (* a (pow b 2)))
(* 4 (* a (pow b 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))))
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
(* 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)
(* 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/4 (* a x-scale))
(*.f64 #s(literal 1/4 binary64) (*.f64 a x-scale))
(* 1/4 (* a x-scale))
(*.f64 #s(literal 1/4 binary64) (*.f64 a x-scale))
(* 1/4 (* a x-scale))
(*.f64 #s(literal 1/4 binary64) (*.f64 a x-scale))
(* 1/4 (* a x-scale))
(*.f64 #s(literal 1/4 binary64) (*.f64 a x-scale))
(* 1/4 (* a x-scale))
(*.f64 #s(literal 1/4 binary64) (*.f64 a x-scale))
(* 1/4 (* a x-scale))
(*.f64 #s(literal 1/4 binary64) (*.f64 a x-scale))
(* 1/4 (* a x-scale))
(*.f64 #s(literal 1/4 binary64) (*.f64 a x-scale))
(* 1/4 (* a x-scale))
(*.f64 #s(literal 1/4 binary64) (*.f64 a x-scale))
(* 1/4 (* a x-scale))
(*.f64 #s(literal 1/4 binary64) (*.f64 a x-scale))
(* 1/4 (* a x-scale))
(*.f64 #s(literal 1/4 binary64) (*.f64 a x-scale))
(* 1/4 (* a x-scale))
(*.f64 #s(literal 1/4 binary64) (*.f64 a x-scale))
(* 1/4 (* a x-scale))
(*.f64 #s(literal 1/4 binary64) (*.f64 a x-scale))
(* 1/4 (* a x-scale))
(*.f64 #s(literal 1/4 binary64) (*.f64 a x-scale))
(* 1/4 (* a x-scale))
(*.f64 #s(literal 1/4 binary64) (*.f64 a x-scale))
(* 1/4 (* a x-scale))
(*.f64 #s(literal 1/4 binary64) (*.f64 a x-scale))
(* 1/4 (* a x-scale))
(*.f64 #s(literal 1/4 binary64) (*.f64 a x-scale))
(* 1/4 (* a x-scale))
(*.f64 #s(literal 1/4 binary64) (*.f64 a x-scale))
(* 1/4 (* a x-scale))
(*.f64 #s(literal 1/4 binary64) (*.f64 a x-scale))
(* 1/4 (* a x-scale))
(*.f64 #s(literal 1/4 binary64) (*.f64 a x-scale))
(* 1/4 (* a x-scale))
(*.f64 #s(literal 1/4 binary64) (*.f64 a x-scale))
(* 1/4 (* a x-scale))
(*.f64 #s(literal 1/4 binary64) (*.f64 a x-scale))
(* 1/4 (* a x-scale))
(*.f64 #s(literal 1/4 binary64) (*.f64 a x-scale))
(* 1/4 (* a x-scale))
(*.f64 #s(literal 1/4 binary64) (*.f64 a x-scale))
(* 1/4 (* a x-scale))
(*.f64 #s(literal 1/4 binary64) (*.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)
(* a x-scale)
(*.f64 a x-scale)
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 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 #s(literal 0 binary64) (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 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 #s(literal 0 binary64) (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 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 #s(literal 0 binary64) (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 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 #s(literal 0 binary64) (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 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 #s(literal 0 binary64) (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 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 #s(literal 0 binary64) (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 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 #s(literal 0 binary64) (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 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 #s(literal 0 binary64) (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 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 #s(literal 0 binary64) (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 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 #s(literal 0 binary64) (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 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 #s(literal 0 binary64) (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 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 #s(literal 0 binary64) (/.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 (* y-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 b (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 0 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 (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 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 #s(literal 0 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 (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 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 #s(literal 0 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 (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 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 #s(literal 0 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 (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 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 #s(literal 0 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 (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 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 #s(literal 0 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 (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 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 #s(literal 0 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 (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 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 #s(literal 0 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 (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 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 #s(literal 0 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 (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 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 #s(literal 0 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 (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 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 #s(literal 0 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 (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 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 #s(literal 0 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 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 #s(literal 0 binary64) (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 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 #s(literal 0 binary64) (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 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 #s(literal 0 binary64) (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 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 #s(literal 0 binary64) (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 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 #s(literal 0 binary64) (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 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 #s(literal 0 binary64) (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 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 #s(literal 0 binary64) (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 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 #s(literal 0 binary64) (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 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 #s(literal 0 binary64) (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 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 #s(literal 0 binary64) (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 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 #s(literal 0 binary64) (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 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 #s(literal 0 binary64) (/.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 (* (* angle (* b (* 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 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 angle b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (sqrt.f64 (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) #s(literal 0 binary64))))
(* angle (+ (* 1/8 (* (* (pow angle 2) (* b (* x-scale (* y-scale (* (sqrt 8) (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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 (* (* b (* 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 (*.f64 angle angle) (*.f64 b (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (*.f64 #s(literal 0 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) #s(literal 1/3149280000 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) #s(literal 0 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 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) #s(literal 0 binary64))))))
(* 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 x-scale 2))))))) (* (pow angle 2) (+ (* 1/8 (* (* b (* x-scale (* y-scale (* (sqrt 8) (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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 (* (* (pow angle 2) (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1 (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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 (*.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 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) #s(literal 0 binary64)))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (*.f64 b (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (*.f64 #s(literal 0 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) #s(literal 1/3149280000 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) #s(literal 0 binary64)))))) (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (*.f64 b x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 x-scale x-scale)) #s(literal -1/765275040000000 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 #s(literal 0 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) #s(literal 1/3149280000 binary64))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) #s(literal 0 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) #s(literal 0 binary64)))))))))))
(* 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 x-scale 2))))))) (* (pow angle 2) (+ (* 1/8 (* (* b (* x-scale (* y-scale (* (sqrt 8) (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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 (* (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1 (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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 (* (* (pow angle 2) (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1 (+ (* 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/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 (/ (* (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (- (+ (* -1 (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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 (*.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 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) #s(literal 0 binary64)))) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 b (*.f64 (*.f64 x-scale (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (*.f64 #s(literal 0 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) #s(literal 1/3149280000 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) #s(literal 0 binary64))))))) (*.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 #s(literal 0 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 x-scale x-scale)) #s(literal -1/765275040000000 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 #s(literal 0 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) #s(literal 1/3149280000 binary64))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) #s(literal 0 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) #s(literal 0 binary64))))) (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (*.f64 b x-scale) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (+.f64 (*.f64 #s(literal 0 binary64) (+.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 #s(literal 0 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) #s(literal 1/3149280000 binary64))) (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 x-scale x-scale)) #s(literal -1/765275040000000 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 #s(literal 0 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) #s(literal 1/3149280000 binary64))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) #s(literal 0 binary64)))))) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) #s(literal 0 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) #s(literal 0 binary64)))))))))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 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 #s(literal 0 binary64) (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 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 #s(literal 0 binary64) (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 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 #s(literal 0 binary64) (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 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 #s(literal 0 binary64) (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 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 #s(literal 0 binary64) (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 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 #s(literal 0 binary64) (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 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 #s(literal 0 binary64) (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 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 #s(literal 0 binary64) (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))
(* angle (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))))
(*.f64 angle (sqrt.f64 (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) #s(literal 0 binary64))))
(* angle (+ (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))) (* 1/2 (* (* (pow angle 2) (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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))))))))))
(*.f64 angle (+.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) #s(literal 0 binary64))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 0 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) #s(literal 1/3149280000 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) #s(literal 0 binary64)))))))
(* angle (+ (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))) (* (pow angle 2) (+ (* 1/2 (* (* (pow angle 2) (- (+ (* -1 (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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/2 (* (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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))))))))))))
(*.f64 angle (+.f64 (sqrt.f64 (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) #s(literal 0 binary64))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 angle angle) (*.f64 (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 x-scale x-scale)) #s(literal -1/765275040000000 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 #s(literal 0 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) #s(literal 1/3149280000 binary64))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) #s(literal 0 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) #s(literal 0 binary64)))))) (*.f64 (*.f64 #s(literal 0 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) #s(literal 1/3149280000 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) #s(literal 0 binary64))))))))))
(* angle (+ (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))) (* (pow angle 2) (+ (* 1/2 (* (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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/2 (* (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))) (- (+ (* -1 (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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/2 (* (* (pow angle 2) (- (+ (* -1 (+ (* 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/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 (/ (* (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (- (+ (* -1 (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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 (sqrt.f64 (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) #s(literal 0 binary64))) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 #s(literal 0 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) #s(literal 1/3149280000 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) #s(literal 0 binary64)))))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) #s(literal 0 binary64)))) (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 x-scale x-scale)) #s(literal -1/765275040000000 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 #s(literal 0 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) #s(literal 1/3149280000 binary64))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) #s(literal 0 binary64)))))) (*.f64 (*.f64 angle angle) (*.f64 (+.f64 (*.f64 #s(literal 0 binary64) (+.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 #s(literal 0 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) #s(literal 1/3149280000 binary64))) (+.f64 (*.f64 #s(literal 0 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 x-scale x-scale)) #s(literal -1/765275040000000 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (*.f64 #s(literal 0 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) #s(literal 1/3149280000 binary64))) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) #s(literal 0 binary64)))))) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) #s(literal 0 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) #s(literal 0 binary64)))))))))))))
(sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(sqrt.f64 (*.f64 #s(literal 0 binary64) (/.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 (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(sqrt.f64 (*.f64 #s(literal 0 binary64) (/.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 (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(sqrt.f64 (*.f64 #s(literal 0 binary64) (/.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 (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(sqrt.f64 (*.f64 #s(literal 0 binary64) (/.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 (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(sqrt.f64 (*.f64 #s(literal 0 binary64) (/.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 (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(sqrt.f64 (*.f64 #s(literal 0 binary64) (/.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 (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(sqrt.f64 (*.f64 #s(literal 0 binary64) (/.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 (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(sqrt.f64 (*.f64 #s(literal 0 binary64) (/.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 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (sqrt.f64 (*.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
(* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (sqrt.f64 (*.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
(* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (sqrt.f64 (*.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
(* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (sqrt.f64 (*.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
(* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (sqrt.f64 (*.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
(* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (sqrt.f64 (*.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
(* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (sqrt.f64 (*.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
(* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (sqrt.f64 (*.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
(* -1 (* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(*.f64 (*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) x-scale)) (sqrt.f64 (*.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
(* -1 (* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(*.f64 (*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) x-scale)) (sqrt.f64 (*.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
(* -1 (* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(*.f64 (*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) x-scale)) (sqrt.f64 (*.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
(* -1 (* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(*.f64 (*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) x-scale)) (sqrt.f64 (*.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
(* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))
(*.f64 (*.f64 angle angle) (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) #s(literal 0 binary64)))
(* (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 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))))))))
(*.f64 (*.f64 angle angle) (+.f64 (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) #s(literal 0 binary64)) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 0 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) #s(literal 1/3149280000 binary64))))))
(* (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 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2)))))))))))))
(*.f64 (*.f64 angle angle) (+.f64 (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) #s(literal 0 binary64)) (*.f64 (*.f64 angle angle) (+.f64 (neg.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) #s(literal 1/3149280000 binary64))) (+.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 0 binary64) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 x-scale x-scale)) #s(literal -1/765275040000000 binary64)))))))))
(* (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 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (+ (* 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/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))))))))))))))))))
(*.f64 (*.f64 angle angle) (+.f64 (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) #s(literal 0 binary64)) (*.f64 (*.f64 angle angle) (+.f64 (neg.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) #s(literal 1/3149280000 binary64))) (+.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 angle angle) (+.f64 (neg.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 x-scale x-scale)) #s(literal -1/765275040000000 binary64))) (+.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 x-scale x-scale)) #s(literal -1/765275040000000 binary64)) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 0 binary64) (+.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)))))))))))))
(+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(*.f64 #s(literal 0 binary64) (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(*.f64 #s(literal 0 binary64) (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(*.f64 #s(literal 0 binary64) (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(*.f64 #s(literal 0 binary64) (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(*.f64 #s(literal 0 binary64) (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(*.f64 #s(literal 0 binary64) (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(*.f64 #s(literal 0 binary64) (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(*.f64 #s(literal 0 binary64) (/.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 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 0 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 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 0 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 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 0 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 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 0 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 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 0 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 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 0 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 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 0 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 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 0 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 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 0 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 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 0 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 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 0 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 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 0 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 (pow x-scale 2))
(/.f64 #s(literal -1 binary64) (*.f64 x-scale x-scale))
(- (* 1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow x-scale 2))) (/ 1 (pow x-scale 2)))
(-.f64 (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))
(- (* (pow angle 2) (+ (* -1 (* (pow angle 2) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))) (/ 1 (pow x-scale 2)))
(-.f64 (*.f64 (*.f64 angle angle) (+.f64 (/.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 #s(literal -1 binary64) (*.f64 angle angle)) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) #s(literal 1/3149280000 binary64))))) (/.f64 #s(literal 1 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/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2)))))) (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))))))) (/ 1 (pow x-scale 2)))
(-.f64 (*.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 #s(literal -1 binary64) (*.f64 angle angle)) (*.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 4 binary64)) (*.f64 x-scale x-scale)) #s(literal 1/3149280000 binary64)))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(neg.f64 (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(neg.f64 (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(neg.f64 (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(neg.f64 (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(neg.f64 (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(neg.f64 (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(neg.f64 (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(neg.f64 (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(neg.f64 (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(neg.f64 (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(neg.f64 (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(neg.f64 (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(neg.f64 (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(neg.f64 (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(neg.f64 (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(neg.f64 (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(neg.f64 (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(neg.f64 (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(neg.f64 (/.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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(neg.f64 (/.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))) (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.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 x-scale x-scale)) (-.f64 (+.f64 (/.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))))))
(* 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))))))))
(* 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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/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 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))))))) (pow.f64 b #s(literal 4 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))))))))))
(* 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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/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 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))))))) (pow.f64 b #s(literal 4 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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/8 binary64) (/.f64 (*.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 #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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))))))) (pow.f64 b #s(literal 6 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))))))
(* -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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))))))))
(* -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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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/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 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))))))) (pow.f64 b #s(literal 4 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))))))))))
(* -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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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/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 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))))))) (pow.f64 b #s(literal 4 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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/8 binary64) (/.f64 (*.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 #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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))))))) (pow.f64 b #s(literal 6 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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (*.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 (*.f64 #s(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 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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) 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 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (*.f64 #s(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 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (*.f64 #s(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 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 #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 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))))))))
(* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))))))))))
(* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (*.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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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/8 binary64) (/.f64 (*.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 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))))))))) (pow.f64 a #s(literal 4 binary64))))))
(* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+.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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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/8 binary64) (/.f64 (*.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 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))))))))) (pow.f64 a #s(literal 4 binary64))))) (*.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/2 binary64) (*.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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))))))))) (pow.f64 a #s(literal 6 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))))))))
(* -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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))))))))))
(* -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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (*.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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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/8 binary64) (/.f64 (*.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 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))))))))) (pow.f64 a #s(literal 4 binary64))))))
(* -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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+.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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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/8 binary64) (/.f64 (*.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 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))))))))) (pow.f64 a #s(literal 4 binary64))))) (*.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/2 binary64) (*.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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))))))))) (pow.f64 a #s(literal 6 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 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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)))))))
(+ (* -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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 #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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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)))))
(+ (* -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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 #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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 #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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))))) (/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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)))))
(* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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)))))))
(+ (* -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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 #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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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)))))
(+ (* -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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 y-scale (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 #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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 #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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))))) (/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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)))))
(* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 #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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 #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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 #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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)))))))
(+ (* -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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)))))
(+ (* -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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (+.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)))))
(* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)))))))
(+ (* -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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)))))
(+ (* -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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (+.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)))))
(* 1/4 (* a (* x-scale (* (sqrt 2) (sqrt 8)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) a) (*.f64 (*.f64 x-scale (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/4 binary64) a) (*.f64 (*.f64 x-scale (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 8 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 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (+.f64 (*.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 a a) (/.f64 (*.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 (*.f64 #s(literal 1/2 binary64) (+.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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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))) (+ (* 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 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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) a) (*.f64 (*.f64 x-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 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 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (+.f64 (*.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 a a) (/.f64 (*.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 (*.f64 #s(literal 1/2 binary64) (+.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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (/.f64 (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) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))))) (+.f64 (/.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 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (+.f64 (*.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 a a) (/.f64 (*.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 (*.f64 #s(literal 1/2 binary64) (+.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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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) #s(literal 2 binary64))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/196830000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 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 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (-.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.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 (+.f64 (*.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 a a) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 #s(literal 1/4 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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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))))) (/ (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (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)))))) (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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) a) (*.f64 (*.f64 x-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 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 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (+.f64 (*.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 a a) (/.f64 (*.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 (*.f64 #s(literal 1/2 binary64) (+.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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (/.f64 (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) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))))) (+.f64 (/.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 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (+.f64 (*.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 a a) (/.f64 (*.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 (*.f64 #s(literal 1/2 binary64) (+.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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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) #s(literal 2 binary64))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/196830000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 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 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (-.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.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 (+.f64 (*.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 a a) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 #s(literal 1/4 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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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 (*.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/765275040000000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 y-scale y-scale))) (*.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 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 x-scale x-scale)) (*.f64 (/.f64 (*.f64 b b) y-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) 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 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (+.f64 (*.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 a a) (/.f64 (*.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 (*.f64 #s(literal 1/2 binary64) (+.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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (/.f64 (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) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))))) (+.f64 (/.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 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (+.f64 (*.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 a a) (/.f64 (*.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 (*.f64 #s(literal 1/2 binary64) (+.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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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) #s(literal 2 binary64))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/196830000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 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 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (-.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.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 (+.f64 (*.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 a a) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 #s(literal 1/4 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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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) #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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (-.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))))))) (+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (+.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 (*.f64 #s(literal 1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 #s(literal -1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 (/.f64 (*.f64 b b) y-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/11957422500000 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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/196830000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 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 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (-.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.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 (+.f64 (*.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 a a) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 #s(literal 1/4 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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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 (+ (/ (* (pow (sin (* 1/90 (* 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.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 (+ (/ (* (pow (sin (* 1/90 (* 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.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 (+ (/ (* (pow (sin (* 1/90 (* 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.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 (+ (/ (* (pow (sin (* 1/90 (* 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.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 (+ (/ (* (pow (sin (* 1/90 (* 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.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 (+ (/ (* (pow (sin (* 1/90 (* 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.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 (+ (/ (* (pow (sin (* 1/90 (* 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.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 (+ (/ (* (pow (sin (* 1/90 (* 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.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)))))))
(* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (*.f64 a a) (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))))))
(* (pow b 2) (+ (* 4 (* (/ (* (pow a 2) (* (pow b 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 8)))) (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 2) (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 b b) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.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 a a) (+.f64 #s(literal 1/2 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))))))))
(* (pow b 2) (+ (* (/ (* (pow a 2) (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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/2 (* (/ (* (pow a 2) (* (pow b 2) (- (* -4 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 16 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sqrt 8) 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 8)))) (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 8)))) (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 b b) (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.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 a a) (+.f64 #s(literal 1/2 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (-.f64 (*.f64 (*.f64 #s(literal -4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 2 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))))))) x-scale) (/.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 a a) (+.f64 #s(literal 1/2 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 y-scale (sqrt.f64 #s(literal 8 binary64))))))))))
(* (pow b 2) (+ (* (/ (* (pow a 2) (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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) (+ (* 4 (* (/ (* (pow a 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 8)))) (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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/2 (* (/ (* (pow a 2) (* (pow b 2) (- (* 2 (* (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (* 4 (/ (* (- (* -4 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 16 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sqrt 8) 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sqrt 8) 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 8)))) (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow a 2) (- (* -4 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 16 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sqrt 8) 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 8)))) (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 b b) (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.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 a a) (+.f64 #s(literal 1/2 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))))))) x-scale) (/.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 a a) (+.f64 #s(literal 1/2 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (*.f64 b b) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 #s(literal -4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 2 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 #s(literal -4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 2 binary64) (/.f64 (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))))))))
(* (/ (* (pow a 2) (* (pow b 3) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (*.f64 a a) (/.f64 (*.f64 (*.f64 b (*.f64 b 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))))))
(* (pow b 3) (+ (* 4 (* (/ (* (pow a 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (* (/ (* (pow a 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 b (*.f64 b b)) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a 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 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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 a a) x-scale) (/.f64 (sqrt.f64 #s(literal 8 binary64)) 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))))))))
(* (pow b 3) (+ (* 1/2 (* (/ (* (pow a 2) (- (* -4 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (* 16 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (* (pow (sqrt 8) 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))))) (* (pow b 4) (* x-scale (* y-scale (sqrt 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (+ (* 4 (* (/ (* (pow a 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (* (/ (* (pow a 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 b (*.f64 b b)) (+.f64 (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a 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 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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 a a) x-scale) (/.f64 (sqrt.f64 #s(literal 8 binary64)) 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 #s(literal -4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 2 binary64) (/.f64 (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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))))))
(* (pow b 3) (+ (* 1/2 (* (/ (* (pow a 2) (- (* -4 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (* 16 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (* (pow (sqrt 8) 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))))) (* (pow b 4) (* x-scale (* y-scale (sqrt 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (/ (* (pow a 2) (- (* 2 (* (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (* 4 (/ (* (- (* -4 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (* 16 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (* (pow (sqrt 8) 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (sqrt 8) 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))))) (* (pow b 6) (* x-scale (* y-scale (sqrt 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (+ (* 4 (* (/ (* (pow a 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (* (/ (* (pow a 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 b (*.f64 b b)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 #s(literal -4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 2 binary64) (/.f64 (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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))) (+.f64 (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a 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 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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 a a) x-scale) (/.f64 (sqrt.f64 #s(literal 8 binary64)) 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 #s(literal -4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 2 binary64) (/.f64 (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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 6 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))))))
(* -1 (* (/ (* (pow a 2) (* (pow b 3) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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) (*.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 b (*.f64 b 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))))))
(* -1 (* (pow b 3) (+ (* 4 (* (/ (* (pow a 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (* (/ (* (pow a 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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) (*.f64 b (*.f64 b b))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a 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 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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 a a) x-scale) (/.f64 (sqrt.f64 #s(literal 8 binary64)) 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))))))))
(* -1 (* (pow b 3) (+ (* 1/2 (* (/ (* (pow a 2) (- (* -4 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (* 16 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (* (pow (sqrt 8) 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))))) (* (pow b 4) (* x-scale (* y-scale (sqrt 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (+ (* 4 (* (/ (* (pow a 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (* (/ (* (pow a 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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) (*.f64 b (*.f64 b b))) (+.f64 (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a 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 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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 a a) x-scale) (/.f64 (sqrt.f64 #s(literal 8 binary64)) 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 #s(literal -4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 2 binary64) (/.f64 (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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))))))
(* -1 (* (pow b 3) (+ (* 1/2 (* (/ (* (pow a 2) (- (* -4 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (* 16 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (* (pow (sqrt 8) 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))))) (* (pow b 4) (* x-scale (* y-scale (sqrt 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (/ (* (pow a 2) (- (* 2 (* (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (* 4 (/ (* (- (* -4 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2))))))) (* 16 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (* (pow (sqrt 8) 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (sqrt 8) 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))))) (* (pow b 6) (* x-scale (* y-scale (sqrt 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (+ (* 4 (* (/ (* (pow a 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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))))) (* (/ (* (pow a 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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) (*.f64 b (*.f64 b b))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 (*.f64 #s(literal -4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 2 binary64) (/.f64 (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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))) (+.f64 (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a 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 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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 b b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 a a) x-scale) (/.f64 (sqrt.f64 #s(literal 8 binary64)) 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.f64 (*.f64 (*.f64 a a) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 #s(literal -4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 2 binary64) (/.f64 (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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 6 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))))))
(* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (*.f64 a a) (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 a 2) (+ (* 4 (* (/ (* (pow a 2) (* (pow b 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 8)))) (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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 2) (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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 a a) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (-.f64 (+.f64 (+.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 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (/.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (*.f64 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 a 2) (+ (* (/ (* (pow b 2) (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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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/2 (* (/ (* (pow a 2) (* (pow b 2) (- (* -4 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 16 (/ (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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sqrt 8) 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 8)))) (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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 8)))) (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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 a a) (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (*.f64 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (-.f64 (*.f64 (*.f64 #s(literal -4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 2 binary64) (/.f64 (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 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (-.f64 (+.f64 (+.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 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))))))
(* (pow a 2) (+ (* (/ (* (pow b 2) (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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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) (+ (* 4 (* (/ (* (pow b 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 8)))) (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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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/2 (* (/ (* (pow a 2) (* (pow b 2) (- (* 2 (* (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (* 4 (/ (* (- (* -4 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 16 (/ (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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sqrt 8) 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sqrt 8) 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 8)))) (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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow b 2) (- (* -4 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* 16 (/ (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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sqrt 8) 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 8)))) (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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 a a) (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64))) (*.f64 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (-.f64 (+.f64 (+.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 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (*.f64 (*.f64 a a) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 #s(literal -4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 2 binary64) (/.f64 (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 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (*.f64 #s(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 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (/.f64 (*.f64 (*.f64 (*.f64 b b) (-.f64 (*.f64 (*.f64 #s(literal -4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 2 binary64) (/.f64 (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 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))))))))
(* (/ (* (pow a 3) (* (pow b 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b 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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))))))))
(* (pow a 3) (+ (* 4 (* (/ (* (pow b 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (* (/ (* (pow b 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 a (*.f64 a a)) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (-.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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 a a) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))) (*.f64 (/.f64 (*.f64 (*.f64 b 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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))))))))))
(* (pow a 3) (+ (* 1/2 (* (/ (* (pow b 2) (- (* -4 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) (* 16 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (* (pow (sqrt 8) 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))))) (* (pow a 4) (* x-scale (* y-scale (sqrt 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (+ (* 4 (* (/ (* (pow b 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (* (/ (* (pow b 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 a (*.f64 a a)) (+.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (-.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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 a a) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))) (*.f64 (/.f64 (*.f64 (*.f64 b 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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (-.f64 (*.f64 (*.f64 #s(literal -4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 2 binary64) (/.f64 (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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))))
(* (pow a 3) (+ (* 1/2 (* (/ (* (pow b 2) (- (* -4 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) (* 16 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (* (pow (sqrt 8) 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))))) (* (pow a 4) (* x-scale (* y-scale (sqrt 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (/ (* (pow b 2) (- (* 2 (* (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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))))) (* 4 (/ (* (- (* -4 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) (* 16 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (* (pow (sqrt 8) 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (sqrt 8) 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))))) (* (pow a 6) (* x-scale (* y-scale (sqrt 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (+ (* 4 (* (/ (* (pow b 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (* (/ (* (pow b 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 a (*.f64 a a)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (-.f64 (*.f64 (*.f64 #s(literal -4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 2 binary64) (/.f64 (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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (+.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (-.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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 a a) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))) (*.f64 (/.f64 (*.f64 (*.f64 b 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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 #s(literal -4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 2 binary64) (/.f64 (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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 6 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))))))
(* -1 (* (/ (* (pow a 3) (* (pow b 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 (*.f64 b 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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))))))))
(* -1 (* (pow a 3) (+ (* 4 (* (/ (* (pow b 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (* (/ (* (pow b 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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) (*.f64 a (*.f64 a a))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (-.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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 a a) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))) (*.f64 (/.f64 (*.f64 (*.f64 b 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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))))))))))
(* -1 (* (pow a 3) (+ (* 1/2 (* (/ (* (pow b 2) (- (* -4 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) (* 16 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (* (pow (sqrt 8) 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))))) (* (pow a 4) (* x-scale (* y-scale (sqrt 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (+ (* 4 (* (/ (* (pow b 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (* (/ (* (pow b 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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) (*.f64 a (*.f64 a a))) (+.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (-.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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 a a) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))) (*.f64 (/.f64 (*.f64 (*.f64 b 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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (-.f64 (*.f64 (*.f64 #s(literal -4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 2 binary64) (/.f64 (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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))))
(* -1 (* (pow a 3) (+ (* 1/2 (* (/ (* (pow b 2) (- (* -4 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) (* 16 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (* (pow (sqrt 8) 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))))) (* (pow a 4) (* x-scale (* y-scale (sqrt 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (/ (* (pow b 2) (- (* 2 (* (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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))))) (* 4 (/ (* (- (* -4 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2))))))) (* 16 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (* (pow (sqrt 8) 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (sqrt 8) 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))))) (* (pow a 6) (* x-scale (* y-scale (sqrt 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (+ (* 4 (* (/ (* (pow b 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 8))))) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))))) (* (/ (* (pow b 2) (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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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) (*.f64 a (*.f64 a a))) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (-.f64 (*.f64 (*.f64 #s(literal -4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 2 binary64) (/.f64 (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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) x-scale) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (+.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (-.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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 a a) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))) (*.f64 (/.f64 (*.f64 (*.f64 b 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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 #s(literal -4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 2 binary64) (/.f64 (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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 6 binary64)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))))))
(* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (*.f64 a a) (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))))
(/ (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (* (pow x-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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (* (sqrt 8) (+ (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) (*.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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 (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 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.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)
(/ (+ (* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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) (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (* (sqrt 8) (+ (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (* (pow 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 8))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 -2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 y-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 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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/2 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))))) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))))) x-scale)
(/ (+ (* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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) (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (* (sqrt 8) (+ (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 2) (* (pow x-scale 2) (- (* 4 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))))))))) (* -2 (/ (* (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (* (pow 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 8))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 2) (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (* (pow 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 8))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 -2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 y-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 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (*.f64 #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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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/2 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))))) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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/2 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))))) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))))))) x-scale)
(* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 a a) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))
(/ (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (* (sqrt 8) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 y-scale (sqrt.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 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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))
(/ (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (* (sqrt 8) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow a 2) (* (pow b 2) (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 8)))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 y-scale (sqrt.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 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a a) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (*.f64 (*.f64 a a) (*.f64 b b)) (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 #s(literal 1/2 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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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)) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))))) (*.f64 x-scale x-scale))
(/ (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (* (sqrt 8) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow a 2) (* (pow b 2) (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 8)))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow a 2) (* (pow b 2) (- (* 4 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (* -2 (/ (* (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 8)))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 y-scale (sqrt.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 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 (*.f64 (*.f64 a a) (*.f64 b b)) (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 #s(literal 1/2 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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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)) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (*.f64 (*.f64 a a) (*.f64 b b)) (-.f64 (/.f64 (*.f64 #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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 #s(literal -1/4 binary64) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 #s(literal 1/2 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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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)) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))))) (*.f64 x-scale x-scale))
(* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 a a) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))
(/ (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (* (sqrt 8) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 y-scale (sqrt.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 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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))
(/ (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (* (sqrt 8) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow a 2) (* (pow b 2) (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 8)))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 y-scale (sqrt.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 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 a a) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (*.f64 (*.f64 a a) (*.f64 b b)) (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 #s(literal 1/2 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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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)) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))))) (*.f64 x-scale x-scale))
(/ (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (* (sqrt 8) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow a 2) (* (pow b 2) (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 8)))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (* (pow a 2) (* (pow b 2) (- (* 4 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (* -2 (/ (* (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 8)))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 y-scale (sqrt.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 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 (*.f64 (*.f64 a a) (*.f64 b b)) (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 #s(literal 1/2 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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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)) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))) (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (*.f64 (*.f64 a a) (*.f64 b b)) (-.f64 (/.f64 (*.f64 #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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 #s(literal -1/4 binary64) (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 #s(literal 1/2 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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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)) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))))))) (*.f64 x-scale x-scale))
(* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (*.f64 a a) (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)))))))))))))
(/ (+ (* -2 (* (/ (* (pow a 2) (* (pow b 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))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (* (sqrt 8) (+ (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) (*.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 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 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)
(/ (+ (* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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) (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (* (sqrt 8) (+ (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (* (pow 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 8))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 -2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 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 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (*.f64 (*.f64 y-scale y-scale) (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 #s(literal 1/2 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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (sqrt.f64 #s(literal 8 binary64)))))))) y-scale)
(/ (+ (* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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) (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (* (sqrt 8) (+ (* (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 2) (* (pow y-scale 2) (- (* 4 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))))))))) (* -2 (/ (* (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (* (pow 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 8))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 2) (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (* (pow 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 8))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 -2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 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 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (-.f64 (/.f64 (*.f64 #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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 #s(literal 1/2 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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (sqrt.f64 #s(literal 8 binary64)))) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 #s(literal 1/2 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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (sqrt.f64 #s(literal 8 binary64)))))))))) y-scale)
(* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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))))))))
(/ (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (* (sqrt 8) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.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 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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))
(/ (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (* (sqrt 8) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 2) (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 8)))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.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 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (*.f64 a a) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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/2 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 #s(literal 8 binary64))))))) (*.f64 y-scale y-scale))
(/ (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (* (sqrt 8) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 2) (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 8)))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 2) (- (* 4 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (* -2 (/ (* (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 8)))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.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 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 a a) (*.f64 b b)) (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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/2 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 #s(literal 8 binary64)))))) (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (-.f64 (/.f64 (*.f64 #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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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/2 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 y-scale #s(literal 6 binary64))) (sqrt.f64 #s(literal 8 binary64))))))) (*.f64 y-scale y-scale))
(* (/ (* (pow a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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))))))))
(/ (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (* (sqrt 8) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.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 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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))
(/ (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (* (sqrt 8) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 2) (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 8)))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.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 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (*.f64 a a) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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/2 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 #s(literal 8 binary64))))))) (*.f64 y-scale y-scale))
(/ (+ (* -2 (* (/ (* (pow a 2) (* (pow b 2) (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (* (sqrt 8) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 2) (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 8)))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (* (/ (* (pow a 2) (* (pow b 2) (- (* 4 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (* -2 (/ (* (- (* 2 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (sqrt 8) 2) (* (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 8)))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 a 2) (* (pow b 2) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.f64 (*.f64 (*.f64 y-scale y-scale) (sqrt.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 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 a a) (*.f64 b b)) (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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/2 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 y-scale #s(literal 4 binary64))) (sqrt.f64 #s(literal 8 binary64)))))) (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) (-.f64 (/.f64 (*.f64 #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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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/2 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 y-scale #s(literal 6 binary64))) (sqrt.f64 #s(literal 8 binary64))))))) (*.f64 y-scale y-scale))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(+ (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2)))) (/ (* a (* (pow angle 2) (* (pow b 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))))) x-scale))
(+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 angle angle) (*.f64 b b)) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (+.f64 (*.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 a a) (/.f64 (*.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 (*.f64 #s(literal 1/2 binary64) (+.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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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))))))) x-scale))
(+ (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2)))) (* (pow angle 2) (+ (* 1/8 (/ (* a (* (pow angle 2) (* (pow b 2) (- (* 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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 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)))))) x-scale)) (/ (* a (* (pow b 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) x-scale))))
(+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 angle angle) (+.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 a (*.f64 (*.f64 (*.f64 angle angle) (*.f64 b b)) (-.f64 (*.f64 #s(literal 8 binary64) (+.f64 (+.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (/.f64 (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) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/196830000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 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 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (-.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.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 (+.f64 (*.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 a a) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 #s(literal 1/4 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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (+.f64 (*.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 a a) (/.f64 (*.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 (*.f64 #s(literal 1/2 binary64) (+.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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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 a a)))))) x-scale) (/.f64 (*.f64 (*.f64 a (*.f64 b b)) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (+.f64 (*.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 a a) (/.f64 (*.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 (*.f64 #s(literal 1/2 binary64) (+.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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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)))))) x-scale))))
(+ (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2)))) (* (pow angle 2) (+ (* (pow angle 2) (+ (* 1/8 (/ (* a (* (pow angle 2) (* (pow b 2) (- (* 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 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/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))))) (/ (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (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)))))) (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (* 1/4 (/ (* (pow y-scale 2) (* (- (* 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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 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))) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 a 2))))))) x-scale)) (* 1/8 (/ (* a (* (pow b 2) (- (* 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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 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))))) x-scale)))) (/ (* a (* (pow b 2) (- (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))))) x-scale))))
(+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a (*.f64 a a)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 angle angle) (+.f64 (/.f64 (*.f64 (*.f64 a (*.f64 b b)) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (+.f64 (*.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 a a) (/.f64 (*.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 (*.f64 #s(literal 1/2 binary64) (+.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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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)))))) x-scale) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/8 binary64) (+.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 angle angle) (*.f64 b b)) (+.f64 (*.f64 #s(literal 8 binary64) (+.f64 (+.f64 (+.f64 (*.f64 #s(literal -1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 y-scale y-scale))) (*.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 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 x-scale x-scale)) (*.f64 (/.f64 (*.f64 b b) y-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) y-scale))))) (*.f64 #s(literal -1/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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (-.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))))))) (+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (+.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 (*.f64 #s(literal 1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 #s(literal -1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 (/.f64 (*.f64 b b) y-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/11957422500000 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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/196830000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 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 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (-.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.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 (+.f64 (*.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 a a) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 #s(literal 1/4 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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 (-.f64 (*.f64 #s(literal 8 binary64) (+.f64 (+.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (/.f64 (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) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/196830000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 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 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (-.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.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 (+.f64 (*.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 a a) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 #s(literal 1/4 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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (+.f64 (*.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 a a) (/.f64 (*.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 (*.f64 #s(literal 1/2 binary64) (+.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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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 a a))) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (+.f64 (*.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 a a) (/.f64 (*.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 (*.f64 #s(literal 1/2 binary64) (+.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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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 a)))))) x-scale) (/.f64 (*.f64 (*.f64 a (*.f64 b b)) (-.f64 (*.f64 #s(literal 8 binary64) (+.f64 (+.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (/.f64 (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) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/196830000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 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 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (-.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.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 (+.f64 (*.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 a a) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 #s(literal 1/4 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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))))))) (*.f64 (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (+.f64 (*.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 a a) (/.f64 (*.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 (*.f64 #s(literal 1/2 binary64) (+.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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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 a a)))) x-scale)))))))
(* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow (sin (* 1/90 (* 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 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.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)))))))
(* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow (sin (* 1/90 (* 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 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.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)))))))
(* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow (sin (* 1/90 (* 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 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.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)))))))
(* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow (sin (* 1/90 (* 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 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.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)))))))
(* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow (sin (* 1/90 (* 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 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.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)))))))
(* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow (sin (* 1/90 (* 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 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.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)))))))
(* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow (sin (* 1/90 (* 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 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.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)))))))
(* (/ (* (pow a 2) (* (pow b 2) (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 (+ (/ (* (pow (sin (* 1/90 (* 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 (*.f64 (*.f64 a a) (*.f64 (*.f64 b b) (sqrt.f64 #s(literal 8 binary64)))) (*.f64 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.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/2 (+ (log (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 x-scale 2) (pow y-scale 2))))) (* 4 (log b))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 a #s(literal 4 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (log.f64 b))))
(+ (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 x-scale 2) (pow y-scale 2))))) (* 4 (log b)))) (* 1/2 (/ (* (pow b 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 #s(literal 1/2 binary64) (+.f64 (+.f64 (log.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 a #s(literal 4 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (log.f64 b))) (/.f64 (*.f64 (*.f64 b b) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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/2 (+ (log (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 x-scale 2) (pow y-scale 2))))) (* 4 (log b)))) (* (pow b 2) (+ (* 1/48 (* (pow b 2) (+ (* -12 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* -12 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2)))))) (* 1/2 (/ (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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/2 binary64) (+.f64 (log.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 a #s(literal 4 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (log.f64 b)))) (*.f64 (*.f64 b b) (+.f64 (*.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 b b)) (*.f64 #s(literal -12 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)) (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))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 2 binary64)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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/2 (+ (log (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 x-scale 2) (pow y-scale 2))))) (* 4 (log b)))) (* (pow b 2) (+ (* 1/2 (/ (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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/1440 (* (pow b 2) (+ (* 180 (* (/ (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (+ (* 240 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) 3) (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))) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))) (* 360 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2)))))))) (* 1/48 (+ (* -12 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* -12 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2))))))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 a #s(literal 4 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (log.f64 b)))) (*.f64 (*.f64 b b) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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/1440 binary64) (*.f64 (*.f64 b b) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))))) (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 #s(literal 240 binary64) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 3 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))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))) (*.f64 (*.f64 #s(literal 360 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))))))) (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))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 2 binary64)))))))) (*.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -12 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)) (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))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 2 binary64)))))))))))
(* 1/2 (+ (log (* 8 (/ (* (pow a 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ 1 b)))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 a #s(literal 4 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal 1 binary64) b)))))
(+ (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ 1 b))))) (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 #s(literal 1/2 binary64) (+.f64 (+.f64 (log.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 a #s(literal 4 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal 1 binary64) b)))) (/.f64 (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 b b) (-.f64 (+.f64 (+.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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))))))))
(+ (* 1/48 (/ (+ (* -12 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))) (* -12 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (pow (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) 2)))) (pow b 4))) (+ (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ 1 b))))) (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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/2 binary64) (+.f64 (+.f64 (log.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 a #s(literal 4 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal 1 binary64) b)))) (/.f64 (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 b b) (-.f64 (+.f64 (+.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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 #s(literal 1/48 binary64) (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)) (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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))))) (pow.f64 b #s(literal 4 binary64))))
(+ (* 1/1440 (/ (+ (* 180 (* (/ (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (sqrt (/ 1 (pow (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (* 240 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) 3))) (* 360 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) 2)))))) (pow b 6))) (+ (* 1/48 (/ (+ (* -12 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))) (* -12 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (pow (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) 2)))) (pow b 4))) (+ (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ 1 b))))) (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (log.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 a #s(literal 4 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal 1 binary64) b)))) (/.f64 (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 b b) (-.f64 (+.f64 (+.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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 #s(literal 1/48 binary64) (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)) (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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))))) (pow.f64 b #s(literal 4 binary64)))) (/.f64 (*.f64 #s(literal 1/1440 binary64) (+.f64 (*.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))) (+.f64 (/.f64 (*.f64 #s(literal 240 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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))) (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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))) (*.f64 (*.f64 #s(literal 360 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))))) (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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))))) (pow.f64 b #s(literal 6 binary64))))
(* 1/2 (+ (log (* 8 (/ (* (pow a 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ -1 b)))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 a #s(literal 4 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal -1 binary64) b)))))
(+ (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ -1 b))))) (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 #s(literal 1/2 binary64) (+.f64 (+.f64 (log.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 a #s(literal 4 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal -1 binary64) b)))) (/.f64 (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 b b) (-.f64 (+.f64 (+.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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))))))))
(+ (* 1/48 (/ (+ (* -12 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))) (* -12 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (pow (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) 2)))) (pow b 4))) (+ (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ -1 b))))) (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (*.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)) (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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))))) (pow.f64 b #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (log.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 a #s(literal 4 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal -1 binary64) b)))) (/.f64 (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 b b) (-.f64 (+.f64 (+.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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))))))))))
(+ (* 1/1440 (/ (+ (* 180 (* (/ (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (sqrt (/ 1 (pow (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (* 240 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) 3))) (* 360 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) 2)))))) (pow b 6))) (+ (* 1/48 (/ (+ (* -12 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))) (* -12 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (pow (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) 2)))) (pow b 4))) (+ (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ -1 b))))) (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (*.f64 #s(literal 1/1440 binary64) (+.f64 (*.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))) (+.f64 (/.f64 (*.f64 #s(literal 240 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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))) (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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))) (*.f64 (*.f64 #s(literal 360 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))))) (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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))))) (pow.f64 b #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)) (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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))))) (pow.f64 b #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (log.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 a #s(literal 4 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal -1 binary64) b)))) (/.f64 (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 b b) (-.f64 (+.f64 (+.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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))))))))))
(* 1/2 (+ (log (* 8 (/ (* (pow b 4) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 x-scale 2) (pow y-scale 2))))) (* 4 (log a))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 b #s(literal 4 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (log.f64 a))))
(+ (* 1/2 (+ (log (* 8 (/ (* (pow b 4) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 x-scale 2) (pow y-scale 2))))) (* 4 (log a)))) (* 1/2 (/ (* (pow a 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 #s(literal 1/2 binary64) (+.f64 (+.f64 (log.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 b #s(literal 4 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (log.f64 a))) (/.f64 (*.f64 (*.f64 a a) (-.f64 (+.f64 (+.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 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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/2 (+ (log (* 8 (/ (* (pow b 4) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 x-scale 2) (pow y-scale 2))))) (* 4 (log a)))) (* (pow a 2) (+ (* 1/48 (* (pow a 2) (+ (* -12 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* -12 (/ (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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2)))))) (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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/2 binary64) (+.f64 (log.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 b #s(literal 4 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (log.f64 a)))) (*.f64 (*.f64 a a) (+.f64 (*.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 a a)) (*.f64 #s(literal -12 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (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 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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)) (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))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (*.f64 #s(literal 1/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 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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/2 (+ (log (* 8 (/ (* (pow b 4) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 x-scale 2) (pow y-scale 2))))) (* 4 (log a)))) (* (pow a 2) (+ (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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/1440 (* (pow a 2) (+ (* 180 (* (/ (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (+ (* 240 (/ (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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) 3) (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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))) (* 360 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2)))))))) (* 1/48 (+ (* -12 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* -12 (/ (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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2))))))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 b #s(literal 4 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (log.f64 a)))) (*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 #s(literal 1/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 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (*.f64 #s(literal 1/1440 binary64) (*.f64 a a)) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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)))))) (-.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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 240 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 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 3 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))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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))) (*.f64 (*.f64 #s(literal 360 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 #s(literal 1/48 binary64) (*.f64 #s(literal -12 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (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 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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)) (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))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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)))))))))))
(* 1/2 (+ (log (* 8 (/ (* (pow b 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ 1 a)))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 b #s(literal 4 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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal 1 binary64) a)))))
(+ (* 1/2 (+ (log (* 8 (/ (* (pow b 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ 1 a))))) (* 1/2 (/ (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 #s(literal 1/2 binary64) (+.f64 (+.f64 (log.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 b #s(literal 4 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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal 1 binary64) a)))) (/.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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 a a) (-.f64 (+.f64 (+.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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))))))))))
(+ (* 1/48 (/ (+ (* -12 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))) (* -12 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (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))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) 2)))) (pow a 4))) (+ (* 1/2 (+ (log (* 8 (/ (* (pow b 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ 1 a))))) (* 1/2 (/ (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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/2 binary64) (+.f64 (+.f64 (log.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 b #s(literal 4 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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal 1 binary64) a)))) (/.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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 a a) (-.f64 (+.f64 (+.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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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/48 binary64) (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)) (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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))))) (pow.f64 a #s(literal 4 binary64))))
(+ (* 1/1440 (/ (+ (* 180 (* (/ (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (sqrt (/ 1 (pow (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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))))) (+ (* 240 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) 3))) (* 360 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) 2)))))) (pow a 6))) (+ (* 1/48 (/ (+ (* -12 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))) (* -12 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (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))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) 2)))) (pow a 4))) (+ (* 1/2 (+ (log (* 8 (/ (* (pow b 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ 1 a))))) (* 1/2 (/ (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (/.f64 (*.f64 #s(literal 1/1440 binary64) (+.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))))) (-.f64 (+.f64 (+.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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 240 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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))) (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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))) (*.f64 (*.f64 #s(literal 360 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))))))) (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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))))) (pow.f64 a #s(literal 6 binary64))) (/.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)) (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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))))) (pow.f64 a #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (log.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 b #s(literal 4 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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal 1 binary64) a)))) (/.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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 a a) (-.f64 (+.f64 (+.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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))))))))))
(* 1/2 (+ (log (* 8 (/ (* (pow b 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ -1 a)))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 b #s(literal 4 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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal -1 binary64) a)))))
(+ (* 1/2 (+ (log (* 8 (/ (* (pow b 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ -1 a))))) (* 1/2 (/ (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 #s(literal 1/2 binary64) (+.f64 (+.f64 (log.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 b #s(literal 4 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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal -1 binary64) a)))) (/.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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 a a) (-.f64 (+.f64 (+.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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))))))))))
(+ (* 1/48 (/ (+ (* -12 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))) (* -12 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (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))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) 2)))) (pow a 4))) (+ (* 1/2 (+ (log (* 8 (/ (* (pow b 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ -1 a))))) (* 1/2 (/ (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (*.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)) (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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))))) (pow.f64 a #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (log.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 b #s(literal 4 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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal -1 binary64) a)))) (/.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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 a a) (-.f64 (+.f64 (+.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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))))))))))
(+ (* 1/1440 (/ (+ (* 180 (* (/ (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (sqrt (/ 1 (pow (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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))))) (+ (* 240 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) 3))) (* 360 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) 2)))))) (pow a 6))) (+ (* 1/48 (/ (+ (* -12 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))) (* -12 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (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))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) 2)))) (pow a 4))) (+ (* 1/2 (+ (log (* 8 (/ (* (pow b 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ -1 a))))) (* 1/2 (/ (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (*.f64 #s(literal 1/1440 binary64) (+.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))))) (-.f64 (+.f64 (+.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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 240 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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))) (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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))) (*.f64 (*.f64 #s(literal 360 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))))))) (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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))))) (pow.f64 a #s(literal 6 binary64))) (+.f64 (/.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)) (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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))))) (pow.f64 a #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (log.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 b #s(literal 4 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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal -1 binary64) a)))) (/.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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 a a) (-.f64 (+.f64 (+.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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))))))))))))
(* 1/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 y-scale 2)))) (* -2 (log x-scale))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (log.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (log.f64 x-scale))))
(+ (* -1/4 (/ (* (pow x-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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 y-scale 2)))) (* -2 (log x-scale)))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (log.f64 x-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.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/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 y-scale 2)))) (* -2 (log x-scale)))) (* (pow x-scale 2) (+ (* -1/4 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/48 (* (pow x-scale 2) (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 binary64) (+.f64 (log.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (log.f64 x-scale)))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 #s(literal -1/4 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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/48 binary64) (*.f64 x-scale x-scale)) (+.f64 (*.f64 (/.f64 #s(literal -3 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 (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 6 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.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/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 y-scale 2)))) (* -2 (log x-scale)))) (* (pow x-scale 2) (+ (* -1/4 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/1440 (* (pow x-scale 2) (+ (* -30 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))) 3) (* (pow (+ (* (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) (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))) 3)))) (+ (* 90 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))))))) 4) (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))) 2)))) (* 360 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/48 (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 binary64) (+.f64 (log.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (log.f64 x-scale)))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (/.f64 (*.f64 #s(literal -1/4 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 (*.f64 #s(literal 1/1440 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -30 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 3 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 3 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 90 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 (*.f64 #s(literal 1/90 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.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 #s(literal 360 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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/48 binary64) (+.f64 (*.f64 (/.f64 #s(literal -3 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 (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 6 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.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/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 y-scale 2)))) (* 4 (log (/ 1 x-scale)))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (log.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x-scale)))))
(+ (* -1/4 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 y-scale 2)))) (* 4 (log (/ 1 x-scale))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x-scale))))) (*.f64 (/.f64 #s(literal -1/4 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))))) (/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* 1/48 (/ (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))) (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 y-scale 2)))) (* 4 (log (/ 1 x-scale)))))))
(+.f64 (+.f64 (*.f64 (/.f64 #s(literal -1/4 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))))) (/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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/48 binary64) (+.f64 (*.f64 (/.f64 #s(literal -3 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 (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 6 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 #s(literal 1/2 binary64) (+.f64 (log.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x-scale))))))
(+ (* -1/4 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* 1/1440 (/ (+ (* -30 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))) 3) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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) (pow (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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)))) (+ (* 90 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) 4) (pow (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2)))) (* 360 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))) (+ (* 1/48 (/ (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))) (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 y-scale 2)))) (* 4 (log (/ 1 x-scale))))))))
(+.f64 (*.f64 (/.f64 #s(literal -1/4 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))))) (/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x-scale))))) (/.f64 (*.f64 #s(literal 1/48 binary64) (+.f64 (*.f64 (/.f64 #s(literal -3 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 (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 6 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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/1440 binary64) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -30 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 3 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 3 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 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 #s(literal 90 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 (*.f64 #s(literal 1/90 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.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 4 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 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 360 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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)))))
(* 1/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 y-scale 2)))) (* 4 (log (/ -1 x-scale)))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (log.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x-scale)))))
(+ (* -1/4 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 y-scale 2)))) (* 4 (log (/ -1 x-scale))))))
(+.f64 (*.f64 (/.f64 #s(literal -1/4 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))))) (/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (log.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x-scale))))))
(+ (* -1/4 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* 1/48 (/ (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))) (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 y-scale 2)))) (* 4 (log (/ -1 x-scale)))))))
(+.f64 (+.f64 (*.f64 (/.f64 #s(literal -1/4 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))))) (/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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/48 binary64) (+.f64 (*.f64 (/.f64 #s(literal -3 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 (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 6 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 #s(literal 1/2 binary64) (+.f64 (log.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x-scale))))))
(+ (* -1/4 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* 1/1440 (/ (+ (* -30 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))) 3) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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) (pow (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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)))) (+ (* 90 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) 4) (pow (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2)))) (* 360 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))) (+ (* 1/48 (/ (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))) (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 y-scale 2)))) (* 4 (log (/ -1 x-scale))))))))
(+.f64 (*.f64 (/.f64 #s(literal -1/4 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))))) (/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) (+.f64 (/.f64 (*.f64 #s(literal 1/1440 binary64) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -30 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 3 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 3 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 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 #s(literal 90 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 (*.f64 #s(literal 1/90 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.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 4 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 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 360 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 #s(literal 1/48 binary64) (+.f64 (*.f64 (/.f64 #s(literal -3 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 (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 6 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 #s(literal 1/2 binary64) (+.f64 (log.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x-scale))))))))
(* 1/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (* -2 (log y-scale))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (log.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 x-scale))) (*.f64 #s(literal -2 binary64) (log.f64 y-scale))))
(+ (* -1/4 (/ (* (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))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (* -2 (log y-scale)))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 x-scale))) (*.f64 #s(literal -2 binary64) (log.f64 y-scale)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (* -2 (log y-scale)))) (* (pow y-scale 2) (+ (* -1/4 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/48 (* (pow y-scale 2) (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 binary64) (+.f64 (log.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 x-scale))) (*.f64 #s(literal -2 binary64) (log.f64 y-scale)))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (*.f64 (/.f64 #s(literal -1/4 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 (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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/48 binary64) (*.f64 y-scale y-scale)) (+.f64 (*.f64 (/.f64 #s(literal -3 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 (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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))))))))))) #s(literal 2 binary64)))) (*.f64 #s(literal 6 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (* -2 (log y-scale)))) (* (pow y-scale 2) (+ (* -1/4 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/1440 (* (pow y-scale 2) (+ (* -30 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))) 3) (* (pow (+ (* (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) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))) 3)))) (+ (* 90 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))))))) 4) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))) 2)))) (* 360 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))))))) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/48 (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 binary64) (+.f64 (log.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 x-scale))) (*.f64 #s(literal -2 binary64) (log.f64 y-scale)))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (*.f64 (/.f64 #s(literal -1/4 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 (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.f64 #s(literal 1/1440 binary64) (*.f64 y-scale y-scale)) (+.f64 (+.f64 (*.f64 (/.f64 #s(literal -30 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 (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 3 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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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))))))))))) #s(literal 3 binary64)))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale x-scale))) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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))))))))))) #s(literal 2 binary64)))))) (/.f64 (*.f64 #s(literal 360 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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/48 binary64) (+.f64 (*.f64 (/.f64 #s(literal -3 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 (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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))))))))))) #s(literal 2 binary64)))) (*.f64 #s(literal 6 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (* 4 (log (/ 1 y-scale)))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (log.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 x-scale))) (*.f64 #s(literal 4 binary64) (log.f64 (/.f64 #s(literal 1 binary64) y-scale)))))
(+ (* -1/4 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (* 4 (log (/ 1 y-scale))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 x-scale))) (*.f64 #s(literal 4 binary64) (log.f64 (/.f64 #s(literal 1 binary64) y-scale))))) (*.f64 (/.f64 #s(literal -1/4 binary64) (*.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 (pow.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/48 (/ (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))) (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (* 4 (log (/ 1 y-scale)))))))
(+.f64 (*.f64 (/.f64 #s(literal -1/4 binary64) (*.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 (pow.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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/2 binary64) (+.f64 (log.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 x-scale))) (*.f64 #s(literal 4 binary64) (log.f64 (/.f64 #s(literal 1 binary64) y-scale))))) (/.f64 (*.f64 #s(literal 1/48 binary64) (+.f64 (*.f64 (/.f64 #s(literal -3 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 (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 6 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)))))
(+ (* -1/4 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/1440 (/ (+ (* -30 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))) 3) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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) (pow (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))) 3)))) (+ (* 90 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) 4) (pow (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))) 2)))) (* 360 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))) (+ (* 1/48 (/ (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))) (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (* 4 (log (/ 1 y-scale))))))))
(+.f64 (*.f64 (/.f64 #s(literal -1/4 binary64) (*.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 (pow.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 x-scale))) (*.f64 #s(literal 4 binary64) (log.f64 (/.f64 #s(literal 1 binary64) y-scale))))) (/.f64 (*.f64 #s(literal 1/48 binary64) (+.f64 (*.f64 (/.f64 #s(literal -3 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 (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 6 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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/1440 binary64) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -30 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 3 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 3 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 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale x-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 b b) (+.f64 #s(literal 1/2 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 (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)))))) #s(literal 2 binary64)))))) (/.f64 (*.f64 #s(literal 360 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)))))
(* 1/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (* 4 (log (/ -1 y-scale)))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (log.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 x-scale))) (*.f64 #s(literal 4 binary64) (log.f64 (/.f64 #s(literal -1 binary64) y-scale)))))
(+ (* -1/4 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (* 4 (log (/ -1 y-scale))))))
(+.f64 (*.f64 (/.f64 #s(literal -1/4 binary64) (*.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 (pow.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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/2 binary64) (+.f64 (log.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 x-scale))) (*.f64 #s(literal 4 binary64) (log.f64 (/.f64 #s(literal -1 binary64) y-scale))))))
(+ (* -1/4 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/48 (/ (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))) (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (* 4 (log (/ -1 y-scale)))))))
(+.f64 (+.f64 (*.f64 (/.f64 #s(literal -1/4 binary64) (*.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 (pow.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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/48 binary64) (+.f64 (*.f64 (/.f64 #s(literal -3 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 (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 6 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 #s(literal 1/2 binary64) (+.f64 (log.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 x-scale))) (*.f64 #s(literal 4 binary64) (log.f64 (/.f64 #s(literal -1 binary64) y-scale))))))
(+ (* -1/4 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/1440 (/ (+ (* -30 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))) 3) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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) (pow (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))) 3)))) (+ (* 90 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) 4) (pow (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))) 2)))) (* 360 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))) (+ (* 1/48 (/ (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))) (* 1/2 (+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (* 4 (log (/ -1 y-scale))))))))
(+.f64 (*.f64 (/.f64 #s(literal -1/4 binary64) (*.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 (pow.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.f64 #s(literal 1/1440 binary64) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -30 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 3 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 3 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 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale x-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 b b) (+.f64 #s(literal 1/2 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 (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)))))) #s(literal 2 binary64)))))) (/.f64 (*.f64 #s(literal 360 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 #s(literal 1/48 binary64) (+.f64 (*.f64 (/.f64 #s(literal -3 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 (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 6 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 #s(literal 1/2 binary64) (+.f64 (log.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 x-scale))) (*.f64 #s(literal 4 binary64) (log.f64 (/.f64 #s(literal -1 binary64) y-scale))))))))
(* 1/2 (log (* 16 (/ (* (pow a 6) (pow b 4)) (* (pow x-scale 2) (pow y-scale 4))))))
(*.f64 #s(literal 1/2 binary64) (log.f64 (*.f64 (/.f64 #s(literal 16 binary64) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 b #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))))
(+ (* 1/4 (/ (* (pow angle 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)))))))) (pow a 2))) (* 1/2 (log (* 16 (/ (* (pow a 6) (pow b 4)) (* (pow x-scale 2) (pow y-scale 4)))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (*.f64 (/.f64 #s(literal 16 binary64) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 b #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 angle angle) (*.f64 y-scale y-scale)) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (+.f64 (*.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 a a) (/.f64 (*.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 (*.f64 #s(literal 1/2 binary64) (+.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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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 a)))
(+ (* 1/2 (log (* 16 (/ (* (pow a 6) (pow b 4)) (* (pow x-scale 2) (pow y-scale 4)))))) (* (pow angle 2) (+ (* 1/48 (* (pow angle 2) (+ (* -3 (/ (* (pow y-scale 4) (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 4))) (* 12 (/ (* (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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (pow a 2)))))) (* 1/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 x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 a 2))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (*.f64 (/.f64 #s(literal 16 binary64) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 b #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 angle angle)) (+.f64 (/.f64 (*.f64 #s(literal -3 binary64) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (+.f64 (*.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 a a) (/.f64 (*.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 (*.f64 #s(literal 1/2 binary64) (+.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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal 12 binary64) (*.f64 (*.f64 y-scale y-scale) (+.f64 (+.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (/.f64 (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) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/196830000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 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 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (-.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.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 (+.f64 (*.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 a a) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 #s(literal 1/4 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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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 a)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale y-scale) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (+.f64 (*.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 a a) (/.f64 (*.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 (*.f64 #s(literal 1/2 binary64) (+.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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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 a)))))
(+ (* 1/2 (log (* 16 (/ (* (pow a 6) (pow b 4)) (* (pow x-scale 2) (pow y-scale 4)))))) (* (pow angle 2) (+ (* 1/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 x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2)))))) (* 1/2 (/ (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow 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 a 2))) (* (pow angle 2) (+ (* 1/1440 (* (pow angle 2) (+ (* -180 (/ (* (pow y-scale 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)))))) (- (+ (* -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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 4))) (+ (* 30 (/ (* (pow y-scale 6) (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)))))) 3)) (pow a 6))) (* 360 (/ (* (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 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 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/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))))) (/ (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (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)))))) (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (pow a 2))))))) (* 1/48 (+ (* -3 (/ (* (pow y-scale 4) (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 4))) (* 12 (/ (* (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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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))))))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (*.f64 (/.f64 #s(literal 16 binary64) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 b #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))) (*.f64 (*.f64 angle angle) (+.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 y-scale y-scale) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (+.f64 (*.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 a a) (/.f64 (*.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 (*.f64 #s(literal 1/2 binary64) (+.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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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 a)) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 (*.f64 #s(literal 1/1440 binary64) (*.f64 angle angle)) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -180 binary64) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (+.f64 (*.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 a a) (/.f64 (*.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 (*.f64 #s(literal 1/2 binary64) (+.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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (/.f64 (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) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/196830000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 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 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (-.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.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 (+.f64 (*.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 a a) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 #s(literal 1/4 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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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)))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal 30 binary64) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (+.f64 (*.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 a a) (/.f64 (*.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 (*.f64 #s(literal 1/2 binary64) (+.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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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 3 binary64)))) (pow.f64 a #s(literal 6 binary64)))) (/.f64 (*.f64 #s(literal 360 binary64) (*.f64 (*.f64 y-scale y-scale) (+.f64 (+.f64 (+.f64 (*.f64 #s(literal -1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 y-scale y-scale))) (*.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 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 x-scale x-scale)) (*.f64 (/.f64 (*.f64 b b) y-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) y-scale))))) (*.f64 #s(literal -1/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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (-.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))))))) (+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (+.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 (*.f64 #s(literal 1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 #s(literal -1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 (/.f64 (*.f64 b b) y-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/11957422500000 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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/196830000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 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 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (-.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.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 (+.f64 (*.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 a a) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 #s(literal 1/4 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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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 a)))) (*.f64 #s(literal 1/48 binary64) (+.f64 (/.f64 (*.f64 #s(literal -3 binary64) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (+.f64 (*.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 a a) (/.f64 (*.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 (*.f64 #s(literal 1/2 binary64) (+.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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal 12 binary64) (*.f64 (*.f64 y-scale y-scale) (+.f64 (+.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (/.f64 (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) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/196830000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 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 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (-.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.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 (+.f64 (*.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 a a) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 #s(literal 1/4 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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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 a)))))))))
(* 1/2 (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 #s(literal 1/2 binary64) (log.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.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))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* 1/2 (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 #s(literal 1/2 binary64) (log.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.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))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* 1/2 (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 #s(literal 1/2 binary64) (log.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.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))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* 1/2 (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 #s(literal 1/2 binary64) (log.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.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))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* 1/2 (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 #s(literal 1/2 binary64) (log.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.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))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* 1/2 (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 #s(literal 1/2 binary64) (log.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.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))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* 1/2 (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 #s(literal 1/2 binary64) (log.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.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))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* 1/2 (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 #s(literal 1/2 binary64) (log.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.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))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(+ (log (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 x-scale 2) (pow y-scale 2))))) (* 4 (log b)))
(+.f64 (log.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 a #s(literal 4 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (log.f64 b)))
(+ (log (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 x-scale 2) (pow y-scale 2))))) (+ (* 4 (log b)) (/ (* (pow b 2) (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (log.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 a #s(literal 4 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (log.f64 b))) (/.f64 (*.f64 (*.f64 b b) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))))))
(+ (log (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 x-scale 2) (pow y-scale 2))))) (+ (* 4 (log b)) (* (pow b 2) (- (+ (* 1/24 (* (pow b 2) (+ (* -12 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* -12 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2)))))) (+ (* 1/2 (/ (cos (* 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 a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (pow x-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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (/ (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (log.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 a #s(literal 4 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (log.f64 b))) (*.f64 (*.f64 b b) (+.f64 (*.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 b b)) (*.f64 #s(literal -12 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)) (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))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 2 binary64)))))) (-.f64 (+.f64 (/.f64 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 #s(literal 1/2 binary64) (*.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 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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/2 binary64) (+.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))))))))))))
(+ (log (* 8 (/ (* (pow a 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 x-scale 2) (pow y-scale 2))))) (+ (* 4 (log b)) (* (pow b 2) (- (+ (* 1/2 (/ (cos (* 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 a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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/720 (* (pow b 2) (+ (* 180 (* (/ (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (+ (* 240 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) 3) (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))) (sqrt (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))) (* 360 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2)))))))) (* 1/24 (+ (* -12 (* (sqrt (/ 1 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* -12 (/ (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (* 1/2 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2))))))) (+ (/ 1/2 (* (pow x-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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (* (/ (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (log.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 a #s(literal 4 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (log.f64 b))) (*.f64 (*.f64 b b) (+.f64 (/.f64 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/720 binary64) (*.f64 b b)) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))))) (-.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 #s(literal 240 binary64) (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 3 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))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))) (*.f64 (*.f64 #s(literal 360 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))))))) (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))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 2 binary64))))))) (*.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -12 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (/.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)) (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))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 2 binary64))))))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))))))))))))
(+ (log (* 8 (/ (* (pow a 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ 1 b))))
(+.f64 (log.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 a #s(literal 4 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal 1 binary64) b))))
(- (+ (log (* 8 (/ (* (pow a 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -6 (log (/ 1 b))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow y-scale 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow x-scale 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (/ (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))
(+.f64 (log.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 a #s(literal 4 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (+.f64 (+.f64 (*.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal 1 binary64) b))) (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (-.f64 (+.f64 (+.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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (+.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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 b b)) (-.f64 (+.f64 (+.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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))))))))
(- (+ (log (* 8 (/ (* (pow a 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -6 (log (/ 1 b))) (+ (* 1/24 (/ (+ (* -12 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))) (* -12 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (pow (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) 2)))) (pow b 4))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow y-scale 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow x-scale 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (/ (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))
(+.f64 (+.f64 (+.f64 (log.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 a #s(literal 4 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal 1 binary64) b)))) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (-.f64 (+.f64 (+.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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (+.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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 #s(literal 1/24 binary64) (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)) (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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))))) (pow.f64 b #s(literal 4 binary64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 b b)) (-.f64 (+.f64 (+.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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))))))
(- (+ (log (* 8 (/ (* (pow a 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -6 (log (/ 1 b))) (+ (* 1/720 (/ (+ (* 180 (* (/ (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (sqrt (/ 1 (pow (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (* 240 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) 3))) (* 360 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) 2)))))) (pow b 6))) (+ (* 1/24 (/ (+ (* -12 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))) (* -12 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (pow (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) 2)))) (pow b 4))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow y-scale 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow x-scale 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (/ (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))
(+.f64 (log.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 a #s(literal 4 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (+.f64 (*.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal 1 binary64) b))) (+.f64 (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (-.f64 (+.f64 (+.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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (+.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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 #s(literal 1/24 binary64) (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)) (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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))))) (pow.f64 b #s(literal 4 binary64)))) (/.f64 (*.f64 #s(literal 1/720 binary64) (+.f64 (*.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))) (+.f64 (/.f64 (*.f64 #s(literal 240 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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))) (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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))) (*.f64 (*.f64 #s(literal 360 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))))) (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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))))) (pow.f64 b #s(literal 6 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 b b)) (-.f64 (+.f64 (+.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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))))))))
(+ (log (* 8 (/ (* (pow a 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ -1 b))))
(+.f64 (log.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 a #s(literal 4 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal -1 binary64) b))))
(- (+ (log (* 8 (/ (* (pow a 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -6 (log (/ -1 b))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow y-scale 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow x-scale 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (/ (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))
(+.f64 (log.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 a #s(literal 4 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (+.f64 (*.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal -1 binary64) b))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (-.f64 (+.f64 (+.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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (+.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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 b b)) (-.f64 (+.f64 (+.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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))))))))
(- (+ (log (* 8 (/ (* (pow a 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -6 (log (/ -1 b))) (+ (* 1/24 (/ (+ (* -12 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))) (* -12 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (pow (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) 2)))) (pow b 4))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow y-scale 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow x-scale 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (/ (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))
(+.f64 (+.f64 (+.f64 (log.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 a #s(literal 4 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal -1 binary64) b)))) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (-.f64 (+.f64 (+.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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (+.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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 #s(literal 1/24 binary64) (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)) (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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))))) (pow.f64 b #s(literal 4 binary64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 b b)) (-.f64 (+.f64 (+.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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))))))
(- (+ (log (* 8 (/ (* (pow a 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -6 (log (/ -1 b))) (+ (* 1/720 (/ (+ (* 180 (* (/ (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))) (sqrt (/ 1 (pow (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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))))) (+ (* 240 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) 3))) (* 360 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) 2)))))) (pow b 6))) (+ (* 1/24 (/ (+ (* -12 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))) (* -12 (/ (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 (* (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (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) (pow (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))) 2)))) (pow b 4))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow y-scale 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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)))))))) (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (* (pow x-scale 2) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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 (* (/ (+ (* -2 (/ (* (pow a 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) (- (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow 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))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (+ (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2))))) (* 1/2 (/ 1 (pow y-scale 2)))) 2)))))))
(+.f64 (log.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 a #s(literal 4 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (+.f64 (*.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal -1 binary64) b))) (+.f64 (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)) (-.f64 (+.f64 (+.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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (+.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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 #s(literal 1/24 binary64) (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)) (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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))))) (pow.f64 b #s(literal 4 binary64)))) (/.f64 (*.f64 #s(literal 1/720 binary64) (+.f64 (*.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))) (+.f64 (/.f64 (*.f64 #s(literal 240 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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))) (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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))) (*.f64 (*.f64 #s(literal 360 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))))) (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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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))))))) (pow.f64 b #s(literal 6 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.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)))) (-.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 b b)) (-.f64 (+.f64 (+.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 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))))))))
(+ (log (* 8 (/ (* (pow b 4) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 x-scale 2) (pow y-scale 2))))) (* 4 (log a)))
(+.f64 (log.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 b #s(literal 4 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (log.f64 a)))
(+ (log (* 8 (/ (* (pow b 4) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 x-scale 2) (pow y-scale 2))))) (+ (* 4 (log a)) (/ (* (pow a 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (log.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 b #s(literal 4 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (log.f64 a))) (/.f64 (*.f64 (*.f64 a a) (-.f64 (+.f64 (+.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 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
(+ (log (* 8 (/ (* (pow b 4) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 x-scale 2) (pow y-scale 2))))) (+ (* 4 (log a)) (* (pow a 2) (- (+ (* 1/24 (* (pow a 2) (+ (* -12 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* -12 (/ (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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2)))))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow y-scale 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (pow y-scale 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (log.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 b #s(literal 4 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (log.f64 a))) (*.f64 (*.f64 a a) (+.f64 (*.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 a a)) (*.f64 #s(literal -12 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (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 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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)) (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))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (+.f64 (/.f64 (*.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 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 1/2 binary64) (*.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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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) (*.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 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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/2 binary64) (+.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64))))))))))))
(+ (log (* 8 (/ (* (pow b 4) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 x-scale 2) (pow y-scale 2))))) (+ (* 4 (log a)) (* (pow a 2) (- (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (* (pow y-scale 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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/720 (* (pow a 2) (+ (* 180 (* (/ (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (+ (* 240 (/ (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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) 3) (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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))) (* 360 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2)))))))) (* 1/24 (+ (* -12 (* (sqrt (/ 1 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2))))))) (* -12 (/ (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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) 2)))) 2))))))) (+ (/ 1/2 (* (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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (pow y-scale 2) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (* (/ (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2))) (sqrt (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (log.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 b #s(literal 4 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 y-scale y-scale)))) (+.f64 (*.f64 #s(literal 4 binary64) (log.f64 a)) (*.f64 (*.f64 a a) (+.f64 (/.f64 (*.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 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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) (*.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 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (*.f64 #s(literal 1/720 binary64) (*.f64 a a)) (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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)))))) (-.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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 240 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 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 3 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))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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))) (*.f64 (*.f64 #s(literal 360 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 #s(literal 1/24 binary64) (*.f64 #s(literal -12 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))) (/.f64 (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 y-scale y-scale))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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)) (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))) (sqrt.f64 (+.f64 (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -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 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))))))))
(+ (log (* 8 (/ (* (pow b 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ 1 a))))
(+.f64 (log.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 b #s(literal 4 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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal 1 binary64) a))))
(- (+ (log (* 8 (/ (* (pow b 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -6 (log (/ 1 a))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* (pow x-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (/ (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* (pow a 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))
(+.f64 (log.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 b #s(literal 4 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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (+.f64 (*.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal 1 binary64) a))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 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 x-scale x-scale)) (-.f64 (+.f64 (+.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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 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 y-scale y-scale)) (-.f64 (+.f64 (+.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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 a a)) (-.f64 (+.f64 (+.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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))))))))
(- (+ (log (* 8 (/ (* (pow b 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -6 (log (/ 1 a))) (+ (* 1/24 (/ (+ (* -12 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))) (* -12 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (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))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) 2)))) (pow a 4))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* (pow x-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (/ (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* (pow a 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))
(+.f64 (+.f64 (+.f64 (log.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 b #s(literal 4 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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal 1 binary64) a)))) (+.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 (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (+.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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 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 y-scale y-scale)) (-.f64 (+.f64 (+.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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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/24 binary64) (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)) (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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))))) (pow.f64 a #s(literal 4 binary64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 a a)) (-.f64 (+.f64 (+.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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))))))))
(- (+ (log (* 8 (/ (* (pow b 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -6 (log (/ 1 a))) (+ (* 1/720 (/ (+ (* 180 (* (/ (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (sqrt (/ 1 (pow (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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))))) (+ (* 240 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) 3))) (* 360 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) 2)))))) (pow a 6))) (+ (* 1/24 (/ (+ (* -12 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))) (* -12 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (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))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) 2)))) (pow a 4))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* (pow x-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (/ (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* (pow a 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))
(+.f64 (+.f64 (+.f64 (log.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 b #s(literal 4 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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal 1 binary64) a)))) (+.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 (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (+.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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 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 y-scale y-scale)) (-.f64 (+.f64 (+.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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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/24 binary64) (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)) (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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))))) (pow.f64 a #s(literal 4 binary64)))) (/.f64 (*.f64 #s(literal 1/720 binary64) (+.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))))) (-.f64 (+.f64 (+.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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 240 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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))) (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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))) (*.f64 (*.f64 #s(literal 360 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))))))) (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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))))) (pow.f64 a #s(literal 6 binary64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 a a)) (-.f64 (+.f64 (+.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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))))))))
(+ (log (* 8 (/ (* (pow b 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (* -6 (log (/ -1 a))))
(+.f64 (log.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 b #s(literal 4 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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal -1 binary64) a))))
(- (+ (log (* 8 (/ (* (pow b 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -6 (log (/ -1 a))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* (pow x-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (/ (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* (pow a 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))
(+.f64 (log.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 b #s(literal 4 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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale)))) (-.f64 (+.f64 (*.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal -1 binary64) a))) (+.f64 (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 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 x-scale x-scale)) (-.f64 (+.f64 (+.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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 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 y-scale y-scale)) (-.f64 (+.f64 (+.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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 a a)) (-.f64 (+.f64 (+.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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))))))))
(- (+ (log (* 8 (/ (* (pow b 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -6 (log (/ -1 a))) (+ (* 1/24 (/ (+ (* -12 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))) (* -12 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (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))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) 2)))) (pow a 4))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* (pow x-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (/ (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* (pow a 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))
(+.f64 (+.f64 (+.f64 (log.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 b #s(literal 4 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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal -1 binary64) a)))) (+.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 (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (+.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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 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 y-scale y-scale)) (-.f64 (+.f64 (+.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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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/24 binary64) (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)) (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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))))) (pow.f64 a #s(literal 4 binary64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 a a)) (-.f64 (+.f64 (+.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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))))))))
(- (+ (log (* 8 (/ (* (pow b 4) (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* -6 (log (/ -1 a))) (+ (* 1/720 (/ (+ (* 180 (* (/ (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (- (+ (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))) (sqrt (/ 1 (pow (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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))))) (+ (* 240 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) 3))) (* 360 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 (- (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) 2)))))) (pow a 6))) (+ (* 1/24 (/ (+ (* -12 (* (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))) (* -12 (/ (pow (- (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 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 (* (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 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) (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))))) (+ (sqrt (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))) 2)))) (pow a 4))) (+ (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* (pow x-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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)))))))) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) (* (pow y-scale 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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 (* (/ (+ (* -2 (/ (* (pow b 2) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) (- (/ (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) (* (pow a 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 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/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))))))) (sqrt (/ 1 (+ (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))) (pow (- (* 1/2 (/ 1 (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow y-scale 2))) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow y-scale 2)))))) 2)))))))
(+.f64 (+.f64 (+.f64 (log.f64 (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 (pow.f64 b #s(literal 4 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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal -6 binary64) (log.f64 (/.f64 #s(literal -1 binary64) a)))) (+.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 (*.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (-.f64 (+.f64 (+.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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 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 y-scale y-scale)) (-.f64 (+.f64 (+.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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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/24 binary64) (*.f64 #s(literal -12 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))) (*.f64 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)) (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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))))) (pow.f64 a #s(literal 4 binary64)))) (/.f64 (*.f64 #s(literal 1/720 binary64) (+.f64 (+.f64 (*.f64 #s(literal 180 binary64) (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))))) (-.f64 (+.f64 (+.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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 240 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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))) (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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))) (*.f64 (*.f64 #s(literal 360 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))))))) (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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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)))))) (pow.f64 a #s(literal 6 binary64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 a a)) (-.f64 (+.f64 (+.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 y-scale y-scale))) (+.f64 (/.f64 (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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))))))))
(+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 y-scale 2)))) (* -2 (log x-scale)))
(+.f64 (log.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (log.f64 x-scale)))
(+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 y-scale 2)))) (+ (* -2 (log x-scale)) (* -1/2 (/ (* (pow x-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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (log.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 -2 binary64) (log.f64 x-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.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 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))))))
(+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 y-scale 2)))) (+ (* -2 (log x-scale)) (* (pow x-scale 2) (+ (* -1/2 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/24 (* (pow x-scale 2) (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (log.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (log.f64 x-scale))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (/.f64 #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 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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/24 binary64) (*.f64 x-scale x-scale)) (+.f64 (*.f64 (/.f64 #s(literal -3 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 (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 6 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))))))))))
(+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 y-scale 2)))) (+ (* -2 (log x-scale)) (* (pow x-scale 2) (+ (* -1/2 (/ (- (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/720 (* (pow x-scale 2) (+ (* -30 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))) 3) (* (pow (+ (* (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) (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))) 3)))) (+ (* 90 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))))))) 4) (pow (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))) 2)))) (* 360 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))))))) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/24 (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (log.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal -2 binary64) (log.f64 x-scale))) (*.f64 (*.f64 x-scale x-scale) (+.f64 (*.f64 (/.f64 #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 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 (*.f64 #s(literal 1/720 binary64) (*.f64 x-scale x-scale)) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -30 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 3 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 3 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 90 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 (*.f64 #s(literal 1/90 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.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 #s(literal 360 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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/24 binary64) (+.f64 (*.f64 (/.f64 #s(literal -3 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 (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 6 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))))))))))))))))
(+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 y-scale 2)))) (* 4 (log (/ 1 x-scale))))
(+.f64 (log.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x-scale))))
(+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 y-scale 2)))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 4 (log (/ 1 x-scale)))))
(+.f64 (log.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale))) (+.f64 (*.f64 #s(literal 4 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x-scale))) (*.f64 (/.f64 #s(literal -1/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))))) (/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))))
(+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 y-scale 2)))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* 1/24 (/ (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))) (* 4 (log (/ 1 x-scale))))))
(+.f64 (+.f64 (log.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale))) (*.f64 (/.f64 #s(literal -1/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))))) (/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 4 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x-scale))) (/.f64 (*.f64 #s(literal 1/24 binary64) (+.f64 (*.f64 (/.f64 #s(literal -3 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 (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 6 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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)))))
(+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 y-scale 2)))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* 1/720 (/ (+ (* -30 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))) 3) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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) (pow (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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)))) (+ (* 90 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) 4) (pow (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2)))) (* 360 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))) (+ (* 1/24 (/ (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))) (* 4 (log (/ 1 x-scale)))))))
(+.f64 (+.f64 (log.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale))) (*.f64 (/.f64 #s(literal -1/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))))) (/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))) (+.f64 (+.f64 (*.f64 #s(literal 4 binary64) (log.f64 (/.f64 #s(literal 1 binary64) x-scale))) (/.f64 (*.f64 #s(literal 1/24 binary64) (+.f64 (*.f64 (/.f64 #s(literal -3 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 (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 6 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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/720 binary64) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -30 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 3 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 3 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 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 #s(literal 90 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 (*.f64 #s(literal 1/90 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.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 4 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 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 360 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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)))))
(+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 y-scale 2)))) (* 4 (log (/ -1 x-scale))))
(+.f64 (log.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x-scale))))
(+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 y-scale 2)))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (* 4 (log (/ -1 x-scale)))))
(+.f64 (log.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale))) (+.f64 (*.f64 #s(literal 4 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x-scale))) (*.f64 (/.f64 #s(literal -1/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))))) (/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))))
(+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 y-scale 2)))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* 1/24 (/ (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))) (* 4 (log (/ -1 x-scale))))))
(+.f64 (+.f64 (log.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale))) (*.f64 (/.f64 #s(literal -1/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))))) (/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 4 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x-scale))) (/.f64 (*.f64 #s(literal 1/24 binary64) (+.f64 (*.f64 (/.f64 #s(literal -3 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 (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 6 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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)))))
(+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 y-scale 2)))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))))))) (+ (* 1/720 (/ (+ (* -30 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))) 3) (* (pow (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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) (pow (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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)))) (+ (* 90 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) 4) (pow (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2)))) (* 360 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))) (+ (* 1/24 (/ (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)) (/ (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow y-scale 2)))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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))) (* 4 (log (/ -1 x-scale)))))))
(+.f64 (+.f64 (log.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))))))) (*.f64 y-scale y-scale))) (*.f64 (/.f64 #s(literal -1/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))))) (/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))))))))) (+.f64 (/.f64 (*.f64 #s(literal 1/720 binary64) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -30 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 3 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 3 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 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 #s(literal 90 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 (*.f64 #s(literal 1/90 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.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 4 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 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 360 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 4 binary64) (log.f64 (/.f64 #s(literal -1 binary64) x-scale))) (/.f64 (*.f64 #s(literal 1/24 binary64) (+.f64 (*.f64 (/.f64 #s(literal -3 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 (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/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 6 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) #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 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #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 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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)))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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))))))
(+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (* -2 (log y-scale)))
(+.f64 (log.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 x-scale))) (*.f64 #s(literal -2 binary64) (log.f64 y-scale)))
(+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (+ (* -2 (log y-scale)) (* -1/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))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (log.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 x-scale))) (+.f64 (*.f64 #s(literal -2 binary64) (log.f64 y-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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))))))))))))))))
(+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (+ (* -2 (log y-scale)) (* (pow y-scale 2) (+ (* -1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/24 (* (pow y-scale 2) (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (log.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 x-scale))) (*.f64 #s(literal -2 binary64) (log.f64 y-scale))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (*.f64 (/.f64 #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 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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/24 binary64) (*.f64 y-scale y-scale)) (+.f64 (*.f64 (/.f64 #s(literal -3 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 (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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))))))))))) #s(literal 2 binary64)))) (*.f64 #s(literal 6 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)))))))))))))))))))
(+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (+ (* -2 (log y-scale)) (* (pow y-scale 2) (+ (* -1/2 (/ (- (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/720 (* (pow y-scale 2) (+ (* -30 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))) 3) (* (pow (+ (* (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) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))) 3)))) (+ (* 90 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))))))) 4) (pow (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))) 2)))) (* 360 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))))))) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/24 (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))))))))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 (log.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 x-scale))) (*.f64 #s(literal -2 binary64) (log.f64 y-scale))) (*.f64 (*.f64 y-scale y-scale) (+.f64 (*.f64 (/.f64 #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 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.f64 #s(literal 1/720 binary64) (*.f64 y-scale y-scale)) (+.f64 (+.f64 (*.f64 (/.f64 #s(literal -30 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 (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 3 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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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))))))))))) #s(literal 3 binary64)))) (*.f64 #s(literal 90 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale x-scale))) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 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 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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))))))))))) #s(literal 2 binary64)))))) (/.f64 (*.f64 #s(literal 360 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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/24 binary64) (+.f64 (*.f64 (/.f64 #s(literal -3 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 (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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))))))))))) #s(literal 2 binary64)))) (*.f64 #s(literal 6 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)))))))))))))))))))))
(+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (* 4 (log (/ 1 y-scale))))
(+.f64 (log.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 x-scale))) (*.f64 #s(literal 4 binary64) (log.f64 (/.f64 #s(literal 1 binary64) y-scale))))
(+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))))))) (* 4 (log (/ 1 y-scale)))))
(+.f64 (log.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 x-scale))) (+.f64 (*.f64 #s(literal 4 binary64) (log.f64 (/.f64 #s(literal 1 binary64) y-scale))) (*.f64 (/.f64 #s(literal -1/2 binary64) (*.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 (pow.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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))))))))))
(+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/24 (/ (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))) (* 4 (log (/ 1 y-scale))))))
(+.f64 (+.f64 (log.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 x-scale))) (*.f64 (/.f64 #s(literal -1/2 binary64) (*.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 (pow.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64) (log.f64 (/.f64 #s(literal 1 binary64) y-scale))) (/.f64 (*.f64 #s(literal 1/24 binary64) (+.f64 (*.f64 (/.f64 #s(literal -3 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 (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 6 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)))))
(+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/720 (/ (+ (* -30 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))) 3) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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) (pow (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))) 3)))) (+ (* 90 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) 4) (pow (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))) 2)))) (* 360 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))) (+ (* 1/24 (/ (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))) (* 4 (log (/ 1 y-scale)))))))
(+.f64 (+.f64 (log.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 x-scale))) (*.f64 (/.f64 #s(literal -1/2 binary64) (*.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 (pow.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.f64 #s(literal 4 binary64) (log.f64 (/.f64 #s(literal 1 binary64) y-scale))) (/.f64 (*.f64 #s(literal 1/24 binary64) (+.f64 (*.f64 (/.f64 #s(literal -3 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 (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 6 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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/720 binary64) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -30 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 3 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 3 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 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale x-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 b b) (+.f64 #s(literal 1/2 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 (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)))))) #s(literal 2 binary64)))))) (/.f64 (*.f64 #s(literal 360 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)))))
(+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (* 4 (log (/ -1 y-scale))))
(+.f64 (log.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 x-scale))) (*.f64 #s(literal 4 binary64) (log.f64 (/.f64 #s(literal -1 binary64) y-scale))))
(+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))))))) (* 4 (log (/ -1 y-scale)))))
(+.f64 (log.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 x-scale))) (+.f64 (*.f64 #s(literal 4 binary64) (log.f64 (/.f64 #s(literal -1 binary64) y-scale))) (*.f64 (/.f64 #s(literal -1/2 binary64) (*.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 (pow.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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))))))))))
(+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/24 (/ (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))) (* 4 (log (/ -1 y-scale))))))
(+.f64 (+.f64 (log.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 x-scale))) (*.f64 (/.f64 #s(literal -1/2 binary64) (*.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 (pow.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64) (log.f64 (/.f64 #s(literal -1 binary64) y-scale))) (/.f64 (*.f64 #s(literal 1/24 binary64) (+.f64 (*.f64 (/.f64 #s(literal -3 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 (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 6 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)))))
(+ (log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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 x-scale 2)))) (+ (* -1/2 (/ (- (pow (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) 2) (* 1/4 (/ (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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/720 (/ (+ (* -30 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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)))) 3) (* (pow (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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) (pow (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))) 3)))) (+ (* 90 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2)) (pow x-scale 2))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) 4) (pow (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))) 2)))) (* 360 (/ (+ (* -1/4 (/ (* (pow (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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))) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))) (+ (* 1/24 (/ (+ (* -3 (/ (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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 (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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)))))) 2)))) (* 6 (/ (* (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* 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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (pow (- (pow b 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) (- (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* 1/2 (/ (+ (* -2 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (/ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 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 (sin (* 1/90 (* angle (PI)))) 2) (pow (- (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))) (* 4 (log (/ -1 y-scale)))))))
(+.f64 (+.f64 (log.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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 x-scale))) (*.f64 (/.f64 #s(literal -1/2 binary64) (*.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 (pow.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (*.f64 #s(literal 1/720 binary64) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -30 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 3 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 3 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 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)))))) #s(literal 3 binary64)))) (*.f64 #s(literal 90 binary64) (*.f64 (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (-.f64 (*.f64 b b) (*.f64 a a)))) (*.f64 x-scale x-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 b b) (+.f64 #s(literal 1/2 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 (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)))))) #s(literal 2 binary64)))))) (/.f64 (*.f64 #s(literal 360 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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 4 binary64) (log.f64 (/.f64 #s(literal -1 binary64) y-scale))) (/.f64 (*.f64 #s(literal 1/24 binary64) (+.f64 (*.f64 (/.f64 #s(literal -3 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 (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)))))) #s(literal 2 binary64)))) (*.f64 #s(literal 6 binary64) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))))))) (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #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 (pow.f64 (+.f64 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 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 (+.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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))))))
(log (* 16 (/ (* (pow a 6) (pow b 4)) (* (pow x-scale 2) (pow y-scale 4)))))
(log.f64 (*.f64 (/.f64 #s(literal 16 binary64) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 b #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64)))))
(+ (log (* 16 (/ (* (pow a 6) (pow b 4)) (* (pow x-scale 2) (pow y-scale 4))))) (* 1/2 (/ (* (pow angle 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)))))))) (pow a 2))))
(+.f64 (log.f64 (*.f64 (/.f64 #s(literal 16 binary64) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 b #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 angle angle) (*.f64 y-scale y-scale)) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (+.f64 (*.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 a a) (/.f64 (*.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 (*.f64 #s(literal 1/2 binary64) (+.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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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 a)))
(+ (log (* 16 (/ (* (pow a 6) (pow b 4)) (* (pow x-scale 2) (pow y-scale 4))))) (* (pow angle 2) (+ (* 1/24 (* (pow angle 2) (+ (* -3 (/ (* (pow y-scale 4) (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 4))) (* 12 (/ (* (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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (pow a 2)))))) (* 1/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))))))) (pow a 2))))))
(+.f64 (log.f64 (*.f64 (/.f64 #s(literal 16 binary64) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 b #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 angle angle)) (+.f64 (/.f64 (*.f64 #s(literal -3 binary64) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (+.f64 (*.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 a a) (/.f64 (*.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 (*.f64 #s(literal 1/2 binary64) (+.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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal 12 binary64) (*.f64 (*.f64 y-scale y-scale) (+.f64 (+.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (/.f64 (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) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/196830000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 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 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (-.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.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 (+.f64 (*.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 a a) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 #s(literal 1/4 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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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 a)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (+.f64 (*.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 a a) (/.f64 (*.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 (*.f64 #s(literal 1/2 binary64) (+.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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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 a)))))
(+ (log (* 16 (/ (* (pow a 6) (pow b 4)) (* (pow x-scale 2) (pow y-scale 4))))) (* (pow angle 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))))))) (pow a 2))) (* (pow angle 2) (+ (* 1/720 (* (pow angle 2) (+ (* -180 (/ (* (pow y-scale 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)))))) (- (+ (* -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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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 4))) (+ (* 30 (/ (* (pow y-scale 6) (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)))))) 3)) (pow a 6))) (* 360 (/ (* (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 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 (/ (- (+ (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/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))))) (/ (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (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)))))) (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2)))))) 2) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2))))) (pow (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))) 2)))) (- (/ (pow b 2) (pow x-scale 2)) (/ (pow a 2) (pow y-scale 2))))))) (pow a 2))))))) (* 1/24 (+ (* -3 (/ (* (pow y-scale 4) (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 4))) (* 12 (/ (* (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/2 (/ (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))) (pow (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow y-scale 2))))) 2))) (* 1/4 (/ (pow (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 2 (* (- (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2)))) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow y-scale 2))) (* 1/32400 (/ (* (pow b 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))))))))))
(+.f64 (log.f64 (*.f64 (/.f64 #s(literal 16 binary64) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 a #s(literal 6 binary64)) (pow.f64 b #s(literal 4 binary64))) (pow.f64 y-scale #s(literal 4 binary64))))) (*.f64 (*.f64 angle angle) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 y-scale y-scale) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (+.f64 (*.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 a a) (/.f64 (*.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 (*.f64 #s(literal 1/2 binary64) (+.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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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 a)) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 angle angle)) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -180 binary64) (*.f64 (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (+.f64 (*.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 a a) (/.f64 (*.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 (*.f64 #s(literal 1/2 binary64) (+.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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (/.f64 (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) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/196830000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 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 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (-.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.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 (+.f64 (*.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 a a) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 #s(literal 1/4 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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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)))))))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal 30 binary64) (*.f64 (pow.f64 y-scale #s(literal 6 binary64)) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (+.f64 (*.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 a a) (/.f64 (*.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 (*.f64 #s(literal 1/2 binary64) (+.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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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 3 binary64)))) (pow.f64 a #s(literal 6 binary64)))) (/.f64 (*.f64 #s(literal 360 binary64) (*.f64 (*.f64 y-scale y-scale) (+.f64 (+.f64 (+.f64 (*.f64 #s(literal -1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 y-scale y-scale))) (*.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 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 x-scale x-scale)) (*.f64 (/.f64 (*.f64 b b) y-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) y-scale))))) (*.f64 #s(literal -1/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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (-.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))))))) (+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (+.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 (*.f64 #s(literal 1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 x-scale x-scale))) (+.f64 (*.f64 #s(literal -1/765275040000000 binary64) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 (/.f64 (*.f64 b b) y-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/11957422500000 binary64)) (*.f64 (-.f64 (*.f64 b b) (*.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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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/196830000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 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 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (-.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.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 (+.f64 (*.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 a a) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 #s(literal 1/4 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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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 a)))) (*.f64 #s(literal 1/24 binary64) (+.f64 (/.f64 (*.f64 #s(literal -3 binary64) (*.f64 (pow.f64 y-scale #s(literal 4 binary64)) (pow.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (+.f64 (*.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 a a) (/.f64 (*.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 (*.f64 #s(literal 1/2 binary64) (+.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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (pow.f64 a #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal 12 binary64) (*.f64 (*.f64 y-scale y-scale) (+.f64 (+.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (/.f64 (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) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/196830000 binary64) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (-.f64 (*.f64 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 2 binary64) (*.f64 (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (-.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 (/.f64 (*.f64 b b) x-scale) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale))) (+.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 1/3149280000 binary64) (/.f64 (*.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 (+.f64 (*.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 a a) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale))))) (+.f64 (*.f64 #s(literal -1/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 #s(literal 1/4 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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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 #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/32400 binary64) (*.f64 (/.f64 (*.f64 a a) y-scale) (/.f64 (*.f64 (PI.f64) (PI.f64)) y-scale))) (*.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale 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 a)))))))))
(log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))) (* (pow x-scale 2) (pow y-scale 2)))))
(log.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.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))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))) (* (pow x-scale 2) (pow y-scale 2)))))
(log.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.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))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))) (* (pow x-scale 2) (pow y-scale 2)))))
(log.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.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))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))) (* (pow x-scale 2) (pow y-scale 2)))))
(log.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.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))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))) (* (pow x-scale 2) (pow y-scale 2)))))
(log.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.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))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))) (* (pow x-scale 2) (pow y-scale 2)))))
(log.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.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))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))) (* (pow x-scale 2) (pow y-scale 2)))))
(log.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.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))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(log (* 8 (/ (* (pow a 4) (* (pow b 4) (- (+ (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 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 (+ (/ (* (pow (sin (* 1/90 (* 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)))))) (* (pow x-scale 2) (pow y-scale 2)))))
(log.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 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 (*.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))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a a)) (*.f64 b b))
(* (pow a 2) (pow b 2))
(*.f64 (*.f64 a a) (*.f64 b b))
(* (pow a 2) (pow b 2))
(*.f64 (*.f64 a a) (*.f64 b b))
(* (pow a 2) (pow b 2))
(*.f64 (*.f64 a a) (*.f64 b b))
(* (pow a 2) (pow b 2))
(*.f64 (*.f64 a a) (*.f64 b b))
(* (pow a 2) (pow b 2))
(*.f64 (*.f64 a a) (*.f64 b b))
(* (pow a 2) (pow b 2))
(*.f64 (*.f64 a a) (*.f64 b b))
(* (pow a 2) (pow b 2))
(*.f64 (*.f64 a a) (*.f64 b b))
(* (pow a 2) (pow b 2))
(*.f64 (*.f64 a a) (*.f64 b b))
(* (pow a 2) (pow b 2))
(*.f64 (*.f64 a a) (*.f64 b b))
(* (pow a 2) (pow b 2))
(*.f64 (*.f64 a a) (*.f64 b b))
(* (pow a 2) (pow b 2))
(*.f64 (*.f64 a a) (*.f64 b b))
(* (pow a 2) (pow b 2))
(*.f64 (*.f64 a a) (*.f64 b b))
(* (pow a 2) (pow b 2))
(*.f64 (*.f64 a a) (*.f64 b b))
(* (pow a 2) (pow b 2))
(*.f64 (*.f64 a a) (*.f64 b b))
(* (pow a 2) (pow b 2))
(*.f64 (*.f64 a a) (*.f64 b b))
(* (pow a 2) (pow b 2))
(*.f64 (*.f64 a a) (*.f64 b b))
(* (pow a 2) (pow b 2))
(*.f64 (*.f64 a a) (*.f64 b b))
(* (pow a 2) (pow b 2))
(*.f64 (*.f64 a a) (*.f64 b b))
(* (pow a 2) (pow b 2))
(*.f64 (*.f64 a a) (*.f64 b b))
(* (pow a 2) (pow b 2))
(*.f64 (*.f64 a a) (*.f64 b b))
(* (pow a 2) (pow b 2))
(*.f64 (*.f64 a a) (*.f64 b b))
(* (pow a 2) (pow b 2))
(*.f64 (*.f64 a a) (*.f64 b b))
(* (pow a 2) (pow b 2))
(*.f64 (*.f64 a a) (*.f64 b b))
(* (pow a 2) (pow b 2))
(*.f64 (*.f64 a a) (*.f64 b b))
(* 4 (* a (pow b 2)))
(*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))
(* 4 (* a (pow b 2)))
(*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))
(* 4 (* a (pow b 2)))
(*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))
(* 4 (* a (pow b 2)))
(*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))
(* 4 (* a (pow b 2)))
(*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))
(* 4 (* a (pow b 2)))
(*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))
(* 4 (* a (pow b 2)))
(*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))
(* 4 (* a (pow b 2)))
(*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))
(* 4 (* a (pow b 2)))
(*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))
(* 4 (* a (pow b 2)))
(*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))
(* 4 (* a (pow b 2)))
(*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))
(* 4 (* a (pow b 2)))
(*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))
(* 4 (* a (pow b 2)))
(*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))
(* 4 (* a (pow b 2)))
(*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))
(* 4 (* a (pow b 2)))
(*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))
(* 4 (* a (pow b 2)))
(*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))
(* 4 (* a (pow b 2)))
(*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))
(* 4 (* a (pow b 2)))
(*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))
(* 4 (* a (pow b 2)))
(*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))
(* 4 (* a (pow b 2)))
(*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))
(* 4 (* a (pow b 2)))
(*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))
(* 4 (* a (pow b 2)))
(*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))
(* 4 (* a (pow b 2)))
(*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))
(* 4 (* a (pow b 2)))
(*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))
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/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))))

eval502.0ms (0.8%)

Compiler

Compiled 424155 to 7905 computations (98.1% saved)

prune394.0ms (0.6%)

Pruning

57 alts after pruning (54 fresh and 3 done)

PrunedKeptTotal
New1762281790
Fresh152641
Picked325
Done011
Total1780571837
Accuracy
53.9%
Counts
1837 → 57
Alt Table
Click to see full alt table
StatusAccuracyProgram
3.6%
(/.f64 (/.f64 (/.f64 (*.f64 (*.f64 a a) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) y-scale) x-scale) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
3.3%
(/.f64 (/.f64 (*.f64 (*.f64 a (*.f64 b (*.f64 a (*.f64 a b)))) #s(literal 4 binary64)) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
4.5%
(/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 b (*.f64 a (*.f64 a b))) #s(literal -4 binary64))) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 a b))) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
1.7%
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) x-scale) #s(literal 1 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) x-scale))))
6.2%
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) (/.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 y-scale (*.f64 x-scale y-scale)))))) y-scale)
2.5%
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) y-scale)) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
4.6%
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) y-scale)) (/.f64 (*.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 a b)) b) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
3.8%
(/.f64 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 a (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) x-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
3.6%
(/.f64 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 a (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) y-scale)
0.2%
(/.f64 (*.f64 (*.f64 (pow.f64 (*.f64 a b) #s(literal 1/4 binary64)) (pow.f64 (*.f64 a b) #s(literal 1/4 binary64))) (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a #s(literal 8 binary64))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale))))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
3.2%
(/.f64 (*.f64 (*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) a) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))))
4.2%
(/.f64 (*.f64 a (/.f64 (*.f64 a (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
1.1%
(*.f64 (/.f64 (/.f64 (*.f64 a (*.f64 a a)) x-scale) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) (*.f64 y-scale (*.f64 x-scale y-scale)))))
2.1%
(*.f64 (/.f64 (/.f64 (*.f64 a (*.f64 a a)) x-scale) #s(literal 4 binary64)) (/.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (*.f64 (/.f64 b (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a (*.f64 a b)) x-scale))))
4.6%
(*.f64 (/.f64 (*.f64 a (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 b b)) y-scale))))
2.5%
(*.f64 (/.f64 (*.f64 a (*.f64 a a)) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) (*.f64 y-scale (*.f64 x-scale y-scale)))))
1.1%
(*.f64 (/.f64 (*.f64 a (*.f64 a a)) (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) x-scale))) (/.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 y-scale (*.f64 x-scale y-scale))))
3.6%
(*.f64 (/.f64 (*.f64 a (*.f64 a a)) #s(literal 4 binary64)) (/.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 (/.f64 b (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a (*.f64 a b)) x-scale))))
2.2%
(*.f64 (/.f64 a (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) x-scale))) (/.f64 (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) (*.f64 y-scale (*.f64 x-scale y-scale))))
1.6%
(*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64))))) y-scale) (*.f64 y-scale (*.f64 x-scale x-scale)))
8.6%
(*.f64 (*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))) (*.f64 #s(literal 1/4 binary64) b))
18.4%
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (*.f64 angle (sqrt.f64 (*.f64 (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale x-scale)) #s(literal 0 binary64)))))
4.2%
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (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 #s(literal 1 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))
4.5%
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) 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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 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 x-scale x-scale) (*.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 x-scale x-scale) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))) (*.f64 (*.f64 x-scale x-scale) (+.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.7%
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (/.f64 (+.f64 (*.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 x-scale x-scale) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #s(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))))) #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 x-scale x-scale) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))))
17.1%
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) 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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
13.8%
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) 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 (*.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 x-scale x-scale) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))
6.8%
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) 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 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 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))
11.5%
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) 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/32400 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))))))
13.7%
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) 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) (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (/.f64 (*.f64 #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 x-scale x-scale) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))))))))
11.6%
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) 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 #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 (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)))))))
10.0%
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) 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 #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 (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)))))))
13.4%
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) 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 #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 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 2 binary64)))))))
9.0%
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) 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 #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 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)))))))
10.4%
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) 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 #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 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)))))))
14.5%
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) 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 #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 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.5%
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 x-scale x-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 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)))))))
14.5%
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (exp.f64 (*.f64 (log.f64 #s(literal 8 binary64)) #s(literal 1/2 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 #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 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)))))))
4.1%
(*.f64 (*.f64 (sqrt.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 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 x-scale x-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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-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))))) (pow.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 x-scale x-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 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))
35.0%
(*.f64 (*.f64 x-scale (*.f64 a #s(literal 4 binary64))) #s(literal 1/4 binary64))
1.9%
(*.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))))))))
0.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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.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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
3.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 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)))))))))))))
34.8%
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 a (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 2 binary64)))
2.7%
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.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 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.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 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
1.2%
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 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 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)))))))
3.1%
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 (exp.f64 (*.f64 (log.f64 a) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)))))))))
3.2%
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (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 #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 a a) (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 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 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)))))))))
11.3%
(*.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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
32.1%
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (*.f64 #s(literal 0 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))
11.5%
(*.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))
9.9%
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 x-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 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))
35.0%
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a x-scale)) #s(literal 4 binary64))
1.0%
(*.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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))
35.0%
(*.f64 x-scale a)
34.7%
(*.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 7736 to 3414 computations (55.9% saved)

simplify237.0ms (0.4%)

Algorithm
egg-herbie
Localize:

Found 16 expressions of interest:

NewMetricScoreProgram
cost-diff6784
(*.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 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))))
cost-diff12928
(+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(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)))))
cost-diff12928
(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 #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 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))))))
cost-diff12928
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) 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 #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 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)))))))
cost-diff14208
(/.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 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))
cost-diff35072
(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 #s(literal 1 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))
cost-diff35072
(sqrt.f64 (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 #s(literal 1 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))
cost-diff35072
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (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 #s(literal 1 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))
cost-diff0
(*.f64 x-scale y-scale)
cost-diff0
(/.f64 a (*.f64 x-scale y-scale))
cost-diff0
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) y-scale))
cost-diff128
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) y-scale)) (/.f64 (*.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 a b)) b) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
cost-diff0
(*.f64 x-scale a)
cost-diff0
(*.f64 a #s(literal 4 binary64))
cost-diff0
(*.f64 x-scale (*.f64 a #s(literal 4 binary64)))
cost-diff256
(*.f64 (*.f64 x-scale (*.f64 a #s(literal 4 binary64))) #s(literal 1/4 binary64))
Rules
5348×*-lowering-*.f32
5348×*-lowering-*.f64
2234×/-lowering-/.f32
2234×/-lowering-/.f64
2146×fma-lowering-fma.f32
Iterations

Useful iterations: 4 (0.0ms)

IterNodesCost
078950
1199901
2737810
34049726
45598719
08055719
Stop Event
iter limit
node limit
Calls
Call 1
Inputs
(* (* x-scale (* a 4)) 1/4)
(* x-scale (* a 4))
x-scale
(* a 4)
a
4
1/4
(* x-scale a)
x-scale
a
(/ (* (/ a (* x-scale y-scale)) (/ (* a (* a (* (* b b) 4))) y-scale)) (/ (* (* (* a 4) (* a b)) b) (* x-scale (* y-scale (* x-scale y-scale)))))
(* (/ a (* x-scale y-scale)) (/ (* a (* a (* (* b b) 4))) y-scale))
(/ a (* x-scale y-scale))
a
(* x-scale y-scale)
x-scale
y-scale
(/ (* a (* a (* (* b b) 4))) y-scale)
(* a (* a (* (* b b) 4)))
(* a (* (* b b) 4))
(* (* b b) 4)
(* b b)
b
4
(/ (* (* (* a 4) (* a b)) b) (* x-scale (* y-scale (* x-scale y-scale))))
(* (* (* a 4) (* a b)) b)
(* (* a 4) (* a b))
(* a 4)
(* a b)
(* x-scale (* y-scale (* x-scale y-scale)))
(* y-scale (* x-scale y-scale))
(* (* (* 1/4 b) (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (/ 1 (* x-scale x-scale))) (/ (* -1 (/ (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (/ (* x-scale x-scale) (+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90))))))) (+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90))))))))
(* (* 1/4 b) (* x-scale (* y-scale (sqrt 8))))
(* 1/4 b)
1/4
b
(* x-scale (* y-scale (sqrt 8)))
x-scale
(* y-scale (sqrt 8))
y-scale
(sqrt 8)
8
(sqrt (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (/ 1 (* x-scale x-scale))) (/ (* -1 (/ (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (/ (* x-scale x-scale) (+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90))))))) (+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90)))))))
(+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (/ 1 (* x-scale x-scale))) (/ (* -1 (/ (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (/ (* x-scale x-scale) (+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90))))))) (+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90))))))
(+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))
1/2
(* 1/2 (cos (* (* angle (PI)) 1/90)))
(cos (* (* angle (PI)) 1/90))
(* (* angle (PI)) 1/90)
(* angle (PI))
angle
(PI)
1/90
(/ 1 (* x-scale x-scale))
1
(* x-scale x-scale)
(/ (* -1 (/ (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (/ (* x-scale x-scale) (+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90))))))) (+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90)))))
(* -1 (/ (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (/ (* x-scale x-scale) (+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90)))))))
-1
(/ (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (/ (* x-scale x-scale) (+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90))))))
(/ (* x-scale x-scale) (+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90)))))
(+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90))))
(* -1/2 (cos (* (* angle (PI)) 1/90)))
-1/2
(* (* (* 1/4 b) (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (/ (pow (cos (* 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 (sin (* 1/180 (* angle (cbrt (* (PI) (* (PI) (PI))))))) 2))))))
(* (* 1/4 b) (* x-scale (* y-scale (sqrt 8))))
(* 1/4 b)
1/4
b
(* x-scale (* y-scale (sqrt 8)))
x-scale
(* y-scale (sqrt 8))
y-scale
(sqrt 8)
8
(sqrt (+ (/ (pow (cos (* 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 (sin (* 1/180 (* angle (cbrt (* (PI) (* (PI) (PI))))))) 2)))))
(+ (/ (pow (cos (* 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 (sin (* 1/180 (* angle (cbrt (* (PI) (* (PI) (PI))))))) 2))))
(/ (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)
(* -1/2 (/ (* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) 2) (pow (sin (* 1/180 (* angle (cbrt (* (PI) (* (PI) (PI))))))) 2)))
-1/2
(/ (* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) 2) (pow (sin (* 1/180 (* angle (cbrt (* (PI) (* (PI) (PI))))))) 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 (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))
(pow (sin (* 1/180 (* angle (PI)))) 2)
(sin (* 1/180 (* angle (PI))))
(pow (sin (* 1/180 (* angle (cbrt (* (PI) (* (PI) (PI))))))) 2)
(sin (* 1/180 (* angle (cbrt (* (PI) (* (PI) (PI)))))))
(* 1/180 (* angle (cbrt (* (PI) (* (PI) (PI))))))
(* angle (cbrt (* (PI) (* (PI) (PI)))))
(cbrt (* (PI) (* (PI) (PI))))
(* (PI) (* (PI) (PI)))
(* (PI) (PI))
Outputs
(* (* x-scale (* a 4)) 1/4)
(*.f64 x-scale a)
(* x-scale (* a 4))
(*.f64 x-scale (*.f64 a #s(literal 4 binary64)))
x-scale
(* a 4)
(*.f64 a #s(literal 4 binary64))
a
4
#s(literal 4 binary64)
1/4
#s(literal 1/4 binary64)
(* x-scale a)
(*.f64 x-scale a)
x-scale
a
(/ (* (/ a (* x-scale y-scale)) (/ (* a (* a (* (* b b) 4))) y-scale)) (/ (* (* (* a 4) (* a b)) b) (* x-scale (* y-scale (* x-scale y-scale)))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 a (*.f64 #s(literal 4 binary64) b))) (*.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 b (*.f64 a b)) y-scale)) (/.f64 b (*.f64 x-scale y-scale))) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale))))
(* (/ a (* x-scale y-scale)) (/ (* a (* a (* (* b b) 4))) y-scale))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 (*.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 b (*.f64 a b)) y-scale)))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
a
(* x-scale y-scale)
(*.f64 x-scale y-scale)
x-scale
y-scale
(/ (* a (* a (* (* b b) 4))) y-scale)
(*.f64 (*.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 b (*.f64 a b)) y-scale))
(* a (* a (* (* b b) 4)))
(*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b (*.f64 a b)))
(* a (* (* b b) 4))
(*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 a b)))
(* (* b b) 4)
(*.f64 #s(literal 4 binary64) (*.f64 b b))
(* b b)
(*.f64 b b)
b
4
#s(literal 4 binary64)
(/ (* (* (* a 4) (* a b)) b) (* x-scale (* y-scale (* x-scale y-scale))))
(/.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 b (*.f64 a b)) y-scale)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(* (* (* a 4) (* a b)) b)
(*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b (*.f64 a b)))
(* (* a 4) (* a b))
(*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))
(* a 4)
(*.f64 a #s(literal 4 binary64))
(* a b)
(*.f64 a b)
(* x-scale (* y-scale (* x-scale y-scale)))
(*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))
(* y-scale (* x-scale y-scale))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* (* (* 1/4 b) (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (/ 1 (* x-scale x-scale))) (/ (* -1 (/ (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (/ (* x-scale x-scale) (+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90))))))) (+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90))))))))
(*.f64 (*.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 b (sqrt.f64 #s(literal 0 binary64))))))
(* (* 1/4 b) (* x-scale (* y-scale (sqrt 8))))
(*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) #s(literal 1/4 binary64)) b))
(* 1/4 b)
(*.f64 #s(literal 1/4 binary64) b)
1/4
#s(literal 1/4 binary64)
b
(* 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 y-scale (sqrt.f64 #s(literal 8 binary64)))
y-scale
(sqrt 8)
(sqrt.f64 #s(literal 8 binary64))
8
#s(literal 8 binary64)
(sqrt (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (/ 1 (* x-scale x-scale))) (/ (* -1 (/ (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (/ (* x-scale x-scale) (+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90))))))) (+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90)))))))
(sqrt.f64 #s(literal 0 binary64))
(+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (/ 1 (* x-scale x-scale))) (/ (* -1 (/ (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (/ (* x-scale x-scale) (+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90))))))) (+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90))))))
#s(literal 0 binary64)
(+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90))))
(+.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/2
#s(literal 1/2 binary64)
(* 1/2 (cos (* (* angle (PI)) 1/90)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))
(cos (* (* angle (PI)) 1/90))
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(* (* angle (PI)) 1/90)
(*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))
(* angle (PI))
(*.f64 angle (PI.f64))
angle
(PI)
(PI.f64)
1/90
#s(literal 1/90 binary64)
(/ 1 (* x-scale x-scale))
(/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))
1
#s(literal 1 binary64)
(* x-scale x-scale)
(*.f64 x-scale x-scale)
(/ (* -1 (/ (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (/ (* x-scale x-scale) (+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90))))))) (+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90)))))
(*.f64 (+.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1 binary64)) (/.f64 #s(literal -1/2 binary64) (*.f64 x-scale x-scale)))
(* -1 (/ (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (/ (* x-scale x-scale) (+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90)))))))
(*.f64 (*.f64 (+.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1 binary64)) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale))) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))
-1
#s(literal -1 binary64)
(/ (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (/ (* x-scale x-scale) (+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90))))))
(/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-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)))))
(/ (* x-scale x-scale) (+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90)))))
(/.f64 (*.f64 x-scale x-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))))
(+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90))))
(+.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/2 (cos (* (* angle (PI)) 1/90)))
(*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))
-1/2
#s(literal -1/2 binary64)
(* (* (* 1/4 b) (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (/ (pow (cos (* 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 (sin (* 1/180 (* angle (cbrt (* (PI) (* (PI) (PI))))))) 2))))))
(*.f64 (*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) #s(literal 1/4 binary64)) b)) (sqrt.f64 (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (+.f64 (/.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 x-scale x-scale)) (*.f64 (/.f64 (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))))))
(* (* 1/4 b) (* x-scale (* y-scale (sqrt 8))))
(*.f64 x-scale (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) #s(literal 1/4 binary64)) b))
(* 1/4 b)
(*.f64 #s(literal 1/4 binary64) b)
1/4
#s(literal 1/4 binary64)
b
(* 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 y-scale (sqrt.f64 #s(literal 8 binary64)))
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)) (* -1/2 (/ (* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) 2) (pow (sin (* 1/180 (* angle (cbrt (* (PI) (* (PI) (PI))))))) 2)))))
(sqrt.f64 (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (+.f64 (/.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 x-scale x-scale)) (*.f64 (/.f64 (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))))))
(+ (/ (pow (cos (* 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 (sin (* 1/180 (* angle (cbrt (* (PI) (* (PI) (PI))))))) 2))))
(*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (+.f64 (/.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 x-scale x-scale)) (*.f64 (/.f64 (*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 #s(literal -1 binary64) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))))))
(/ (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)
(* -1/2 (/ (* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) 2) (pow (sin (* 1/180 (* angle (cbrt (* (PI) (* (PI) (PI))))))) 2)))
(/.f64 (/.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 #s(literal 0 binary64) (*.f64 x-scale x-scale))) (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)
(/ (* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) 2) (pow (sin (* 1/180 (* angle (cbrt (* (PI) (* (PI) (PI))))))) 2))
(/.f64 (*.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 #s(literal 2 binary64) (*.f64 x-scale x-scale)))) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)))
(* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) 2)
(*.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 #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 (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 x-scale))
(/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* 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 x-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))))
(pow (sin (* 1/180 (* angle (cbrt (* (PI) (* (PI) (PI))))))) 2)
(pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))
(sin (* 1/180 (* angle (cbrt (* (PI) (* (PI) (PI)))))))
(sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))
(* 1/180 (* angle (cbrt (* (PI) (* (PI) (PI))))))
(*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))
(* angle (cbrt (* (PI) (* (PI) (PI)))))
(*.f64 angle (PI.f64))
(cbrt (* (PI) (* (PI) (PI))))
(PI.f64)
(* (PI) (* (PI) (PI)))
(*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))
(* (PI) (PI))
(*.f64 (PI.f64) (PI.f64))

localize3.3s (5%)

Localize:

Found 16 expressions of interest:

NewMetricScoreProgram
accuracy100.0%
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
accuracy100.0%
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
accuracy100.0%
(cbrt.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))))
accuracy3.1%
(PI.f64)
accuracy100.0%
(sqrt.f64 (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 #s(literal 1 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))))
accuracy100.0%
(sqrt.f64 #s(literal 8 binary64))
accuracy100.0%
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
accuracy3.1%
(PI.f64)
accuracy100.0%
(*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))
accuracy100.0%
(*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64))))
accuracy100.0%
(*.f64 a b)
accuracy100.0%
(*.f64 a #s(literal 4 binary64))
accuracy100.0%
(*.f64 x-scale a)
accuracy100.0%
(*.f64 (*.f64 x-scale (*.f64 a #s(literal 4 binary64))) #s(literal 1/4 binary64))
accuracy100.0%
(*.f64 x-scale (*.f64 a #s(literal 4 binary64)))
accuracy100.0%
(*.f64 a #s(literal 4 binary64))
Results
3.1s256×5exit
Compiler

Compiled 998 to 78 computations (92.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 2.6s
ival-sin: 969.0ms (37% of total)
ival-cos: 432.0ms (16.5% of total)
...c/correct-round.rkt:119:19: 342.0ms (13.1% of total)
ival-mult: 323.0ms (12.3% of total)
backward-pass: 166.0ms (6.3% of total)
ival-div: 127.0ms (4.9% of total)
ival-pow: 80.0ms (3.1% of total)
ival-sqrt: 61.0ms (2.3% of total)
ival-add: 39.0ms (1.5% of total)
ival-cbrt: 34.0ms (1.3% of total)
compiled-spec: 30.0ms (1.1% of total)
ival-pi: 9.0ms (0.3% of total)
const: 5.0ms (0.2% of total)

series47.0ms (0.1%)

Counts
25 → 588
Calls
Call 1
Inputs
#<alt (* (* x-scale (* a 4)) 1/4)>
#<alt (* x-scale (* a 4))>
#<alt (* a 4)>
#<alt (* x-scale a)>
#<alt (/ (* (/ a (* x-scale y-scale)) (/ (* a (* a (* (* b b) 4))) y-scale)) (/ (* (* (* a 4) (* a b)) b) (* x-scale (* y-scale (* x-scale y-scale)))))>
#<alt (* (/ a (* x-scale y-scale)) (/ (* a (* a (* (* b b) 4))) y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (* x-scale y-scale)>
#<alt (* (* (* 1/4 b) (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (/ 1 (* x-scale x-scale))) (/ (* -1 (/ (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (/ (* x-scale x-scale) (+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90))))))) (+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90))))))))>
#<alt (sqrt (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (/ 1 (* x-scale x-scale))) (/ (* -1 (/ (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (/ (* x-scale x-scale) (+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90))))))) (+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90)))))))>
#<alt (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (/ 1 (* x-scale x-scale))) (/ (* -1 (/ (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (/ (* x-scale x-scale) (+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90))))))) (+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90))))))>
#<alt (/ (* -1 (/ (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (/ (* x-scale x-scale) (+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90))))))) (+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90)))))>
#<alt (* (* (* 1/4 b) (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (/ (pow (cos (* 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 (sin (* 1/180 (* angle (cbrt (* (PI) (* (PI) (PI))))))) 2))))))>
#<alt (sqrt (+ (/ (pow (cos (* 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 (sin (* 1/180 (* angle (cbrt (* (PI) (* (PI) (PI))))))) 2)))))>
#<alt (+ (/ (pow (cos (* 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 (sin (* 1/180 (* angle (cbrt (* (PI) (* (PI) (PI))))))) 2))))>
#<alt (* -1/2 (/ (* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) 2) (pow (sin (* 1/180 (* angle (cbrt (* (PI) (* (PI) (PI))))))) 2)))>
#<alt (* a b)>
#<alt (* a (* a (* (* b b) 4)))>
#<alt (* a (* (* b b) 4))>
#<alt (PI)>
#<alt (cos (* (* angle (PI)) 1/90))>
#<alt (sqrt 8)>
#<alt (cbrt (* (PI) (* (PI) (PI))))>
#<alt (cos (* 1/180 (* angle (PI))))>
#<alt (sin (* 1/180 (* angle (PI))))>
Outputs
#<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 (* 4 (* a x-scale))>
#<alt (* 4 (* a x-scale))>
#<alt (* 4 (* a x-scale))>
#<alt (* 4 (* a x-scale))>
#<alt (* 4 (* a x-scale))>
#<alt (* 4 (* a x-scale))>
#<alt (* 4 (* a x-scale))>
#<alt (* 4 (* a x-scale))>
#<alt (* 4 (* a x-scale))>
#<alt (* 4 (* a x-scale))>
#<alt (* 4 (* a x-scale))>
#<alt (* 4 (* a x-scale))>
#<alt (* 4 (* a x-scale))>
#<alt (* 4 (* a x-scale))>
#<alt (* 4 (* a x-scale))>
#<alt (* 4 (* a x-scale))>
#<alt (* 4 (* a x-scale))>
#<alt (* 4 (* a x-scale))>
#<alt (* 4 (* a x-scale))>
#<alt (* 4 (* a x-scale))>
#<alt (* 4 (* a x-scale))>
#<alt (* 4 (* a x-scale))>
#<alt (* 4 (* a x-scale))>
#<alt (* 4 (* a x-scale))>
#<alt (* 4 a)>
#<alt (* 4 a)>
#<alt (* 4 a)>
#<alt (* 4 a)>
#<alt (* 4 a)>
#<alt (* 4 a)>
#<alt (* 4 a)>
#<alt (* 4 a)>
#<alt (* 4 a)>
#<alt (* 4 a)>
#<alt (* 4 a)>
#<alt (* 4 a)>
#<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 (* 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 (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (/ a (* x-scale y-scale))>
#<alt (* x-scale y-scale)>
#<alt (* x-scale y-scale)>
#<alt (* x-scale y-scale)>
#<alt (* x-scale y-scale)>
#<alt (* x-scale y-scale)>
#<alt (* x-scale y-scale)>
#<alt (* x-scale y-scale)>
#<alt (* x-scale y-scale)>
#<alt (* x-scale y-scale)>
#<alt (* x-scale y-scale)>
#<alt (* x-scale y-scale)>
#<alt (* x-scale y-scale)>
#<alt (* x-scale y-scale)>
#<alt (* x-scale y-scale)>
#<alt (* x-scale y-scale)>
#<alt (* x-scale y-scale)>
#<alt (* x-scale y-scale)>
#<alt (* x-scale y-scale)>
#<alt (* x-scale y-scale)>
#<alt (* x-scale y-scale)>
#<alt (* x-scale y-scale)>
#<alt (* x-scale y-scale)>
#<alt (* x-scale y-scale)>
#<alt (* x-scale y-scale)>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))>
#<alt (* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))>
#<alt (* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))>
#<alt (* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))>
#<alt (* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))>
#<alt (* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))>
#<alt (* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))>
#<alt (* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))>
#<alt (* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))>
#<alt (* -1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))>
#<alt (* -1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))>
#<alt (* -1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))>
#<alt (* -1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 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 x-scale 2)))))))>
#<alt (* angle (+ (* 1/8 (* (* (pow angle 2) (* b (* 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 (* (* b (* 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 (* (* b (* 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 (* (* b (* 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 (* (* (pow angle 2) (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/765275040000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/765275040000000 (/ (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 (* (* b (* 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 (* (* b (* 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 (* (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/765275040000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/765275040000000 (/ (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 (* (* (pow angle 2) (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/347128758144000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* 1/347128758144000000000 (/ (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/765275040000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/765275040000000 (/ (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 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))>
#<alt (* angle (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))))>
#<alt (* angle (+ (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))) (* 1/2 (* (* (pow angle 2) (+ (* -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))))))))))>
#<alt (* angle (+ (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))) (* (pow angle 2) (+ (* 1/2 (* (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))))) (* 1/2 (* (* (pow angle 2) (- (+ (* -1/765275040000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/765275040000000 (/ (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 (+ (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))) (* (pow angle 2) (+ (* 1/2 (* (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))))) (* (pow angle 2) (+ (* 1/2 (* (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))) (- (+ (* -1/765275040000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/765275040000000 (/ (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/2 (* (* (pow angle 2) (- (+ (* -1/347128758144000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* 1/347128758144000000000 (/ (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/765275040000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/765275040000000 (/ (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 (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))>
#<alt (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))>
#<alt (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))>
#<alt (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))>
#<alt (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))>
#<alt (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))>
#<alt (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))>
#<alt (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))>
#<alt (* (/ 1 x-scale) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))>
#<alt (* (/ 1 x-scale) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))>
#<alt (* (/ 1 x-scale) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))>
#<alt (* (/ 1 x-scale) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))>
#<alt (* (/ 1 x-scale) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))>
#<alt (* (/ 1 x-scale) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))>
#<alt (* (/ 1 x-scale) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))>
#<alt (* (/ 1 x-scale) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))>
#<alt (* -1 (* (/ 1 x-scale) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))>
#<alt (* -1 (* (/ 1 x-scale) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))>
#<alt (* -1 (* (/ 1 x-scale) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))>
#<alt (* -1 (* (/ 1 x-scale) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))>
#<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/765275040000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/765275040000000 (/ (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/765275040000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/765275040000000 (/ (pow (PI) 6) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/347128758144000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* 1/347128758144000000000 (/ (pow (PI) 8) (pow x-scale 2))))))))))))))>
#<alt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))>
#<alt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))>
#<alt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))>
#<alt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))>
#<alt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))>
#<alt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))>
#<alt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))>
#<alt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))>
#<alt (/ (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))>
#<alt (/ (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))>
#<alt (/ (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))>
#<alt (/ (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))>
#<alt (/ (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))>
#<alt (/ (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))>
#<alt (/ (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))>
#<alt (/ (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))>
#<alt (/ (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))>
#<alt (/ (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))>
#<alt (/ (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))>
#<alt (/ (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))>
#<alt (/ -1 (pow x-scale 2))>
#<alt (- (* 1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow x-scale 2))) (/ 1 (pow x-scale 2)))>
#<alt (- (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow angle 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))) (/ 1 (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))) (* 1/765275040000000 (/ (* (pow angle 2) (pow (PI) 6)) (pow x-scale 2))))))) (/ 1 (pow x-scale 2)))>
#<alt (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))>
#<alt (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))>
#<alt (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))>
#<alt (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))>
#<alt (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))>
#<alt (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))>
#<alt (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))>
#<alt (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))>
#<alt (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))>
#<alt (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))>
#<alt (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))>
#<alt (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))>
#<alt (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))>
#<alt (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))>
#<alt (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))>
#<alt (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))>
#<alt (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))>
#<alt (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))>
#<alt (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))>
#<alt (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* -1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* -1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* -1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* -1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 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 x-scale 2)))))))>
#<alt (* angle (+ (* 1/8 (* (* (pow angle 2) (* b (* x-scale (* y-scale (* (sqrt 8) (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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 (* (* b (* 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 (* (* b (* 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 (* (* b (* x-scale (* y-scale (* (sqrt 8) (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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 (* (* (pow angle 2) (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1 (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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 (* (* b (* 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 (* (* b (* x-scale (* y-scale (* (sqrt 8) (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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 (* (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1 (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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 (* (* (pow angle 2) (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1 (+ (* 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/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 (/ (* (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (- (+ (* -1 (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))>
#<alt (* angle (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))))>
#<alt (* angle (+ (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))) (* 1/2 (* (* (pow angle 2) (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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))))))))))>
#<alt (* angle (+ (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))) (* (pow angle 2) (+ (* 1/2 (* (* (pow angle 2) (- (+ (* -1 (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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/2 (* (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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))))))))))))>
#<alt (* angle (+ (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))) (* (pow angle 2) (+ (* 1/2 (* (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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/2 (* (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))) (- (+ (* -1 (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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/2 (* (* (pow angle 2) (- (+ (* -1 (+ (* 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/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 (/ (* (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (- (+ (* -1 (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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 (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))>
#<alt (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))>
#<alt (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))>
#<alt (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))>
#<alt (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))>
#<alt (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))>
#<alt (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))>
#<alt (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))>
#<alt (* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))>
#<alt (* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))>
#<alt (* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))>
#<alt (* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))>
#<alt (* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))>
#<alt (* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))>
#<alt (* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))>
#<alt (* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))>
#<alt (* -1 (* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* -1 (* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* -1 (* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<alt (* -1 (* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))>
#<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 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (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 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (+ (* 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/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))))))))))))))))))>
#<alt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))>
#<alt (/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))>
#<alt (/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))>
#<alt (/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))>
#<alt (/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))>
#<alt (/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))>
#<alt (/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))>
#<alt (/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))>
#<alt (/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))>
#<alt (/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))>
#<alt (/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))>
#<alt (/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))>
#<alt (/ -1 (pow x-scale 2))>
#<alt (- (* 1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow x-scale 2))) (/ 1 (pow x-scale 2)))>
#<alt (- (* (pow angle 2) (+ (* -1 (* (pow angle 2) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))) (/ 1 (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/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2)))))) (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))))))) (/ 1 (pow x-scale 2)))>
#<alt (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))>
#<alt (* a b)>
#<alt (* a b)>
#<alt (* a b)>
#<alt (* a b)>
#<alt (* a b)>
#<alt (* a b)>
#<alt (* a b)>
#<alt (* a b)>
#<alt (* a b)>
#<alt (* a b)>
#<alt (* a b)>
#<alt (* a b)>
#<alt (* a b)>
#<alt (* a b)>
#<alt (* a b)>
#<alt (* a b)>
#<alt (* a b)>
#<alt (* a b)>
#<alt (* a b)>
#<alt (* a b)>
#<alt (* a b)>
#<alt (* a b)>
#<alt (* a b)>
#<alt (* a b)>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* (pow a 2) (pow b 2)))>
#<alt (* 4 (* a (pow b 2)))>
#<alt (* 4 (* a (pow b 2)))>
#<alt (* 4 (* a (pow b 2)))>
#<alt (* 4 (* a (pow b 2)))>
#<alt (* 4 (* a (pow b 2)))>
#<alt (* 4 (* a (pow b 2)))>
#<alt (* 4 (* a (pow b 2)))>
#<alt (* 4 (* a (pow b 2)))>
#<alt (* 4 (* a (pow b 2)))>
#<alt (* 4 (* a (pow b 2)))>
#<alt (* 4 (* a (pow b 2)))>
#<alt (* 4 (* a (pow b 2)))>
#<alt (* 4 (* a (pow b 2)))>
#<alt (* 4 (* a (pow b 2)))>
#<alt (* 4 (* a (pow b 2)))>
#<alt (* 4 (* a (pow b 2)))>
#<alt (* 4 (* a (pow b 2)))>
#<alt (* 4 (* a (pow b 2)))>
#<alt (* 4 (* a (pow b 2)))>
#<alt (* 4 (* a (pow b 2)))>
#<alt (* 4 (* a (pow b 2)))>
#<alt (* 4 (* a (pow b 2)))>
#<alt (* 4 (* a (pow b 2)))>
#<alt (* 4 (* a (pow b 2)))>
#<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))))>
Calls

147 calls:

TimeVariablePointExpression
5.0ms
angle
@inf
(* (* (* 1/4 b) (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (/ 1 (* x-scale x-scale))) (/ (* -1 (/ (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (/ (* x-scale x-scale) (+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90))))))) (+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90))))))))
4.0ms
b
@0
(* (* (* 1/4 b) (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (/ 1 (* x-scale x-scale))) (/ (* -1 (/ (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (/ (* x-scale x-scale) (+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90))))))) (+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90))))))))
4.0ms
angle
@0
(* (* (* 1/4 b) (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (/ 1 (* x-scale x-scale))) (/ (* -1 (/ (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (/ (* x-scale x-scale) (+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90))))))) (+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90))))))))
3.0ms
x-scale
@0
(* (* (* 1/4 b) (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (/ 1 (* x-scale x-scale))) (/ (* -1 (/ (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (/ (* x-scale x-scale) (+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90))))))) (+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90))))))))
3.0ms
angle
@-inf
(* (* (* 1/4 b) (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (/ 1 (* x-scale x-scale))) (/ (* -1 (/ (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (/ (* x-scale x-scale) (+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90))))))) (+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90))))))))

rewrite337.0ms (0.5%)

Algorithm
batch-egg-rewrite
Rules
3858×*-lowering-*.f32
3858×*-lowering-*.f64
2148×/-lowering-/.f32
2148×/-lowering-/.f64
2074×fma-lowering-fma.f32
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
078513
1367472
23180454
08560454
Stop Event
iter limit
node limit
Counts
25 → 490
Calls
Call 1
Inputs
(* (* x-scale (* a 4)) 1/4)
(* x-scale (* a 4))
(* a 4)
(* x-scale a)
(/ (* (/ a (* x-scale y-scale)) (/ (* a (* a (* (* b b) 4))) y-scale)) (/ (* (* (* a 4) (* a b)) b) (* x-scale (* y-scale (* x-scale y-scale)))))
(* (/ a (* x-scale y-scale)) (/ (* a (* a (* (* b b) 4))) y-scale))
(/ a (* x-scale y-scale))
(* x-scale y-scale)
(* (* (* 1/4 b) (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (/ 1 (* x-scale x-scale))) (/ (* -1 (/ (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (/ (* x-scale x-scale) (+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90))))))) (+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90))))))))
(sqrt (+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (/ 1 (* x-scale x-scale))) (/ (* -1 (/ (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (/ (* x-scale x-scale) (+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90))))))) (+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90)))))))
(+ (* (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (/ 1 (* x-scale x-scale))) (/ (* -1 (/ (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (/ (* x-scale x-scale) (+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90))))))) (+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90))))))
(/ (* -1 (/ (+ 1/2 (* 1/2 (cos (* (* angle (PI)) 1/90)))) (/ (* x-scale x-scale) (+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90))))))) (+ 1/2 (* -1/2 (cos (* (* angle (PI)) 1/90)))))
(* (* (* 1/4 b) (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (/ (pow (cos (* 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 (sin (* 1/180 (* angle (cbrt (* (PI) (* (PI) (PI))))))) 2))))))
(sqrt (+ (/ (pow (cos (* 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 (sin (* 1/180 (* angle (cbrt (* (PI) (* (PI) (PI))))))) 2)))))
(+ (/ (pow (cos (* 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 (sin (* 1/180 (* angle (cbrt (* (PI) (* (PI) (PI))))))) 2))))
(* -1/2 (/ (* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale x-scale))) 2) (pow (sin (* 1/180 (* angle (cbrt (* (PI) (* (PI) (PI))))))) 2)))
(* a b)
(* a (* a (* (* b b) 4)))
(* a (* (* b b) 4))
(PI)
(cos (* (* angle (PI)) 1/90))
(sqrt 8)
(cbrt (* (PI) (* (PI) (PI))))
(cos (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
Outputs
(*.f64 x-scale (*.f64 a #s(literal 1 binary64)))
(*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 x-scale #s(literal 1/4 binary64)))
(*.f64 (*.f64 x-scale (*.f64 a #s(literal 4 binary64))) #s(literal 1/4 binary64))
(*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 a #s(literal 4 binary64))))
(*.f64 (*.f64 x-scale a) #s(literal 1 binary64))
(*.f64 (*.f64 a #s(literal 1 binary64)) x-scale)
(*.f64 (*.f64 #s(literal 1/4 binary64) x-scale) (*.f64 a #s(literal 4 binary64)))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale a)) #s(literal 4 binary64))
(*.f64 x-scale (*.f64 a #s(literal 4 binary64)))
(*.f64 a (*.f64 x-scale #s(literal 4 binary64)))
(*.f64 a (*.f64 #s(literal 4 binary64) x-scale))
(*.f64 #s(literal 4 binary64) (*.f64 x-scale a))
(*.f64 (*.f64 a #s(literal 4 binary64)) x-scale)
(*.f64 (*.f64 x-scale a) #s(literal 4 binary64))
(*.f64 (*.f64 x-scale #s(literal 4 binary64)) a)
(*.f64 a #s(literal 4 binary64))
(*.f64 #s(literal 4 binary64) a)
(*.f64 x-scale a)
(*.f64 a x-scale)
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (*.f64 (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (/.f64 (*.f64 x-scale y-scale) a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (/.f64 (*.f64 x-scale y-scale) a)) (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (-.f64 #s(literal 0 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(neg.f64 (/.f64 (/.f64 (/.f64 (*.f64 a (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) y-scale) (-.f64 #s(literal 0 binary64) (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(/.f64 (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (/.f64 (*.f64 x-scale y-scale) a)) (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (*.f64 (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (/.f64 (*.f64 x-scale y-scale) a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (*.f64 (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (/.f64 (*.f64 x-scale y-scale) a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 1 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (*.f64 (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (/.f64 (*.f64 x-scale y-scale) a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(/.f64 (*.f64 a (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) (*.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (/.f64 (/.f64 (*.f64 a (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) y-scale) (-.f64 #s(literal 0 binary64) (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (-.f64 #s(literal 0 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(/.f64 (/.f64 (*.f64 a (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) (*.f64 x-scale y-scale)) (*.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) y-scale))
(/.f64 (/.f64 (*.f64 a (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) y-scale) (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(/.f64 (/.f64 (*.f64 a (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) y-scale) (*.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 x-scale y-scale)))
(/.f64 (/.f64 (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (/.f64 (*.f64 x-scale y-scale) a)) (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) a) (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(/.f64 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale)) (*.f64 y-scale (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(/.f64 (*.f64 (*.f64 a (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) y-scale) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(/.f64 (neg.f64 (/.f64 (/.f64 (*.f64 a (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) y-scale) (-.f64 #s(literal 0 binary64) (*.f64 x-scale y-scale)))) (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (/.f64 (*.f64 x-scale y-scale) a)) #s(literal 1 binary64)) (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 a (/.f64 (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 x-scale y-scale))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 x-scale y-scale) a))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) a) (/.f64 (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (-.f64 #s(literal 0 binary64) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 a x-scale) (/.f64 (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) y-scale)
(/.f64 (*.f64 (*.f64 a (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))))) y-scale)
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) y-scale) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))))) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (/.f64 (*.f64 x-scale y-scale) a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))))
(/.f64 (/.f64 (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (/.f64 (*.f64 x-scale y-scale) a)) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (/.f64 (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (/.f64 (*.f64 x-scale y-scale) a)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))) x-scale)) (/.f64 b (*.f64 x-scale (*.f64 y-scale y-scale))))
(pow.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (*.f64 (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (/.f64 (*.f64 x-scale y-scale) a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (*.f64 (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (/.f64 (*.f64 x-scale y-scale) a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 a (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))))))
(*.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (/.f64 (*.f64 x-scale y-scale) a)) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))))
(*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (/.f64 (*.f64 x-scale y-scale) a)) (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (/.f64 (*.f64 x-scale y-scale) a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))))
(*.f64 (/.f64 (/.f64 (*.f64 a (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) y-scale) (-.f64 #s(literal 0 binary64) (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (-.f64 #s(literal 0 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(*.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (/.f64 (*.f64 x-scale y-scale) a)))
(*.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (/.f64 (*.f64 x-scale y-scale) a))) #s(literal -1 binary64)))
(*.f64 (/.f64 (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (/.f64 (*.f64 x-scale y-scale) a)) (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 (/.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 (/.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale)))
(*.f64 (/.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))) x-scale)) (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (/.f64 b (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale)))
(*.f64 (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))) x-scale)) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 b (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) (pow.f64 (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale) (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (/.f64 (*.f64 x-scale y-scale) a))) #s(literal -1 binary64)))
(*.f64 (*.f64 (/.f64 (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (/.f64 (*.f64 x-scale y-scale) a)) (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))
(*.f64 (*.f64 (/.f64 (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (/.f64 (*.f64 x-scale y-scale) a)) (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale))
(*.f64 (*.f64 (/.f64 (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (/.f64 (*.f64 x-scale y-scale) a)) (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale)
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (pow.f64 (/.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (/.f64 (*.f64 x-scale y-scale) a))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))) x-scale)) (pow.f64 (/.f64 (/.f64 b (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (/.f64 (*.f64 x-scale y-scale) a))) #s(literal -1 binary64)))
(*.f64 (/.f64 (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (/.f64 (*.f64 x-scale y-scale) a)) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))))
(*.f64 (/.f64 (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (/.f64 (*.f64 x-scale y-scale) a)) (-.f64 #s(literal 0 binary64) (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))))) (-.f64 #s(literal 0 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (/.f64 (*.f64 x-scale y-scale) a)) (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) x-scale)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))) (/.f64 a (*.f64 x-scale y-scale))) #s(literal -1 binary64)) (pow.f64 (/.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))) (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale)) #s(literal -1 binary64)) (pow.f64 (/.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 a (*.f64 x-scale y-scale))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (/.f64 a (*.f64 x-scale y-scale))) #s(literal -1 binary64)) (pow.f64 (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale) (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale)) #s(literal -1 binary64)) (pow.f64 (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale) (/.f64 a (*.f64 x-scale y-scale))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))) x-scale) (/.f64 a (*.f64 x-scale y-scale))) #s(literal -1 binary64)) (pow.f64 (/.f64 (/.f64 b (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))) x-scale) (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale)) #s(literal -1 binary64)) (pow.f64 (/.f64 (/.f64 b (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a (*.f64 x-scale y-scale))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 a (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (pow.f64 (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 a (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) (*.f64 x-scale y-scale))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (pow.f64 (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 a (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) y-scale)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(/.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 y-scale (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))))
(/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (/.f64 (*.f64 x-scale y-scale) a))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (/.f64 y-scale (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 y-scale (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 a (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))))))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (*.f64 a (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) (*.f64 x-scale y-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 a (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) y-scale)))
(/.f64 (*.f64 a (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 a #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (/.f64 y-scale (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))))))
(/.f64 (/.f64 (*.f64 a (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) (*.f64 x-scale y-scale)) y-scale)
(/.f64 (/.f64 (*.f64 a (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) y-scale) (*.f64 x-scale y-scale))
(/.f64 (*.f64 a (-.f64 #s(literal 0 binary64) (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))))) (*.f64 (*.f64 x-scale y-scale) (-.f64 #s(literal 0 binary64) y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) y-scale))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))))) (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (-.f64 #s(literal 0 binary64) y-scale)))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) a) (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 x-scale y-scale)) y-scale))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) a) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 x-scale y-scale)) (/.f64 y-scale (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) a) (-.f64 #s(literal 0 binary64) (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 x-scale y-scale)) (-.f64 #s(literal 0 binary64) y-scale)))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (/.f64 a x-scale) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 y-scale (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))))))
(/.f64 (*.f64 (/.f64 a x-scale) (-.f64 #s(literal 0 binary64) (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))))) (*.f64 y-scale (-.f64 #s(literal 0 binary64) y-scale)))
(/.f64 (*.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (*.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (-.f64 #s(literal 0 binary64) a)) (*.f64 y-scale (-.f64 #s(literal 0 binary64) (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (/.f64 a x-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 #s(literal 1 binary64) a) (*.f64 (/.f64 y-scale (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) a)) (*.f64 (/.f64 y-scale (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) (-.f64 #s(literal 0 binary64) (*.f64 x-scale y-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 a x-scale)) (*.f64 (/.f64 y-scale (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) y-scale))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) a) (*.f64 (-.f64 #s(literal 0 binary64) y-scale) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) y-scale) (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) (-.f64 #s(literal 0 binary64) a)) (*.f64 (-.f64 #s(literal 0 binary64) y-scale) (-.f64 #s(literal 0 binary64) (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) (/.f64 a x-scale)) (*.f64 (-.f64 #s(literal 0 binary64) y-scale) y-scale))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) a) (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale)) (-.f64 #s(literal 0 binary64) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale)) y-scale)
(/.f64 (neg.f64 (*.f64 a (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))))) (neg.f64 (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) (*.f64 x-scale y-scale))) (-.f64 #s(literal 0 binary64) y-scale))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) y-scale)) (-.f64 #s(literal 0 binary64) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (/.f64 y-scale (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (-.f64 #s(literal 0 binary64) (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))))) (-.f64 #s(literal 0 binary64) y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale y-scale) a))
(/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (-.f64 #s(literal 0 binary64) a)) (-.f64 #s(literal 0 binary64) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (/.f64 a x-scale)) y-scale)
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) (/.f64 a (*.f64 x-scale y-scale))) (-.f64 #s(literal 0 binary64) y-scale))
(/.f64 (/.f64 (/.f64 (*.f64 a (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) y-scale) x-scale) y-scale)
(/.f64 (/.f64 (/.f64 (*.f64 a (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) y-scale) y-scale) x-scale)
(pow.f64 (*.f64 (/.f64 (*.f64 x-scale y-scale) a) (/.f64 y-scale (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 y-scale (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) (/.f64 (*.f64 x-scale y-scale) a)) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 a (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))))) #s(literal -1 binary64))
(pow.f64 (/.f64 y-scale (/.f64 (*.f64 a (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) (*.f64 x-scale y-scale))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale y-scale) (/.f64 (*.f64 a (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) y-scale)) #s(literal -1 binary64))
(*.f64 a (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale)))
(*.f64 a (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) y-scale)) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 a (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 a (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale))
(*.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (*.f64 a (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 (*.f64 a (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) (*.f64 x-scale y-scale)) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 a x-scale) (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) y-scale))
(*.f64 (/.f64 a y-scale) (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) x-scale))
(*.f64 (/.f64 a y-scale) (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) a) (*.f64 a (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) y-scale)))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 x-scale y-scale) a)) #s(literal -1 binary64)))
(neg.f64 (/.f64 a (-.f64 #s(literal 0 binary64) (*.f64 x-scale y-scale))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) a) (*.f64 x-scale y-scale)))
(/.f64 a (*.f64 x-scale y-scale))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) a))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 x-scale y-scale) a) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 a x-scale)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 x-scale y-scale) a)))
(/.f64 (-.f64 #s(literal 0 binary64) a) (-.f64 #s(literal 0 binary64) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 a #s(literal 1 binary64)) (*.f64 x-scale y-scale))
(/.f64 (/.f64 a x-scale) y-scale)
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) a)) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (/.f64 a x-scale)) (-.f64 #s(literal 0 binary64) y-scale))
(/.f64 (/.f64 a y-scale) x-scale)
(pow.f64 (/.f64 (*.f64 x-scale y-scale) a) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 x-scale y-scale) a) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 y-scale (/.f64 a x-scale)) #s(literal -1 binary64))
(*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 #s(literal 1 binary64) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (-.f64 #s(literal 0 binary64) a) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 x-scale y-scale))))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 a x-scale))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) a)
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (pow.f64 (/.f64 #s(literal 1 binary64) a) #s(literal -1 binary64)))
(*.f64 (/.f64 a x-scale) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (pow.f64 (/.f64 y-scale a) #s(literal -1 binary64)))
(*.f64 x-scale y-scale)
(*.f64 y-scale x-scale)
(*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (*.f64 x-scale y-scale) (pow.f64 (*.f64 #s(literal 8 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 x-scale x-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 x-scale x-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 #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 1/2 binary64)))))
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 b (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) x-scale) (sqrt.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 x-scale x-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 x-scale x-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 #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 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (pow.f64 (*.f64 #s(literal 8 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 x-scale x-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 x-scale x-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 #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 1/2 binary64)))))
(*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 (*.f64 x-scale y-scale) (pow.f64 (*.f64 #s(literal 8 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 x-scale x-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 x-scale x-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 #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 1/2 binary64))))
(*.f64 (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (sqrt.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 x-scale x-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 x-scale x-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 #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) (*.f64 (*.f64 b (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) x-scale)) (sqrt.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 x-scale x-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 x-scale x-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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))))
(*.f64 (sqrt.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 x-scale x-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 x-scale x-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 #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/4 binary64) (*.f64 (*.f64 b (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) x-scale)))
(*.f64 (*.f64 x-scale (*.f64 #s(literal 1/4 binary64) b)) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.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 x-scale x-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 x-scale x-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 #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 x-scale y-scale) (pow.f64 (*.f64 #s(literal 8 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 x-scale x-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 x-scale x-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 #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 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) b))
(*.f64 (*.f64 (sqrt.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 x-scale x-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 x-scale x-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 #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 1/4 binary64)) (*.f64 (*.f64 b (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) x-scale))
(*.f64 (*.f64 (sqrt.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 x-scale x-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 x-scale x-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 #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/4 binary64) b)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(*.f64 (*.f64 (sqrt.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 x-scale x-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 x-scale x-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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))) (*.f64 x-scale (*.f64 #s(literal 1/4 binary64) b))) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
(exp.f64 (*.f64 (log.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 x-scale x-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 x-scale x-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 #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 1/2 binary64)))
(sqrt.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 x-scale x-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 x-scale x-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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))))
(/.f64 (hypot.f64 (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 x-scale x-scale)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (-.f64 #s(literal 0 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 x-scale x-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 #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 3/2 binary64))) (sqrt.f64 (+.f64 (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 x-scale x-scale)) #s(literal 2 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-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 #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 0 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 x-scale x-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 #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 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-scale)))))))
(/.f64 (sqrt.f64 (-.f64 (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 x-scale x-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (-.f64 #s(literal 0 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 x-scale x-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 #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 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-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 x-scale x-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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))))
(pow.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 x-scale x-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 x-scale x-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 #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 1/2 binary64))
(pow.f64 (pow.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 x-scale x-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 x-scale x-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 #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 1/4 binary64)) #s(literal 2 binary64))
(pow.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 x-scale x-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 x-scale x-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 #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) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-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 x-scale x-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 #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 1/4 binary64))
(pow.f64 (exp.f64 (log.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 x-scale x-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 x-scale x-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 #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 1/2 binary64))
(*.f64 (hypot.f64 (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 x-scale x-scale)) #s(literal 3/2 binary64)) (pow.f64 (/.f64 (-.f64 #s(literal 0 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 x-scale x-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 #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 3/2 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (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 x-scale x-scale)) #s(literal 2 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-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 #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 0 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 x-scale x-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 #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 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-scale)))))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (-.f64 (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 x-scale x-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (-.f64 #s(literal 0 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 x-scale x-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 #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)))) (pow.f64 (/.f64 #s(literal 1 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 x-scale x-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 x-scale x-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 #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 1/2 binary64)))
(*.f64 (pow.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 x-scale x-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 x-scale x-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 #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 1/4 binary64)) (pow.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 x-scale x-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 x-scale x-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 #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 1/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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-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 #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 0 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 x-scale x-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 #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 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-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 x-scale x-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 x-scale x-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 #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 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-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 x-scale x-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 #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 (/.f64 (-.f64 #s(literal 0 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 x-scale x-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 #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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-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 x-scale x-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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 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 #s(literal 1 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))
(fma.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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))
(fma.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 0 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 x-scale x-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 #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 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (-.f64 #s(literal 0 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 x-scale x-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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))
(fma.f64 #s(literal -1 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 x-scale x-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 #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 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-scale)))
(fma.f64 (-.f64 #s(literal 0 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 x-scale x-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 #s(literal 1 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 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-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 #s(literal 1 binary64) (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.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 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-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 #s(literal -1 binary64) (/.f64 #s(literal 1 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 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-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 #s(literal -1 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 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-scale)))
(fma.f64 (/.f64 #s(literal 1 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 #s(literal 0 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 x-scale x-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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-scale)))
(fma.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 x-scale x-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 #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 -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 x-scale x-scale)))
(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))))) x-scale) (/.f64 #s(literal 1 binary64) 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))
(fma.f64 (/.f64 (-.f64 #s(literal 0 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 x-scale x-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 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 3 binary64)))) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) #s(literal 1/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 x-scale x-scale)))
(fma.f64 (/.f64 (-.f64 #s(literal 0 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 x-scale x-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 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-scale)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (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 x-scale x-scale)) #s(literal 2 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-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 #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 0 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 x-scale x-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 #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 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-scale))))) (+.f64 (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 x-scale x-scale)) #s(literal 3 binary64)) (pow.f64 (/.f64 (-.f64 #s(literal 0 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 x-scale x-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 #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 3 binary64)))))
(/.f64 #s(literal 1 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 x-scale x-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 x-scale x-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 #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 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (-.f64 #s(literal 0 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 x-scale x-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 #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 (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 x-scale x-scale)) #s(literal 3 binary64)) (pow.f64 (/.f64 (-.f64 #s(literal 0 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 x-scale x-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 #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 3 binary64))) (+.f64 (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 x-scale x-scale)) #s(literal 2 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-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 #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 0 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 x-scale x-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 #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 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-scale))))))
(/.f64 (+.f64 (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 x-scale x-scale)) #s(literal 3 binary64)) (pow.f64 (/.f64 (-.f64 #s(literal 0 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 x-scale x-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 #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 3 binary64))) (+.f64 (pow.f64 (/.f64 (-.f64 #s(literal 0 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 x-scale x-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 #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 (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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.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) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-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 (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 x-scale x-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (-.f64 #s(literal 0 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 x-scale x-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 #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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-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 x-scale x-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 #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 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.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) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-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 x-scale x-scale)) (*.f64 (*.f64 x-scale x-scale) (/.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.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) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-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 #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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-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 x-scale x-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 #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) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-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 x-scale x-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 x-scale x-scale) (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 (/.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.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) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-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 #s(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) (neg.f64 (*.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) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-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 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-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 x-scale x-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/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 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-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 x-scale x-scale)) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.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 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))))) (*.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 x-scale x-scale)))
(/.f64 (neg.f64 (+.f64 (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 x-scale x-scale)) #s(literal 3 binary64)) (pow.f64 (/.f64 (-.f64 #s(literal 0 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 x-scale x-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 #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 3 binary64)))) (neg.f64 (+.f64 (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 x-scale x-scale)) #s(literal 2 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-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 #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 0 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 x-scale x-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 #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 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-scale)))))))
(/.f64 (neg.f64 (-.f64 (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 x-scale x-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (-.f64 #s(literal 0 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 x-scale x-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 #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)))) (neg.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 x-scale x-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 x-scale x-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 #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 (/.f64 (-.f64 #s(literal 0 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 x-scale x-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 #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)) (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 x-scale x-scale)) #s(literal 2 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-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 #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 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-scale))))
(pow.f64 (/.f64 (+.f64 (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 x-scale x-scale)) #s(literal 2 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-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 #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 0 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 x-scale x-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 #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 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-scale))))) (+.f64 (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 x-scale x-scale)) #s(literal 3 binary64)) (pow.f64 (/.f64 (-.f64 #s(literal 0 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 x-scale x-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 #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 3 binary64)))) #s(literal -1 binary64))
(pow.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 x-scale x-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 x-scale x-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 #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 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (-.f64 #s(literal 0 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 x-scale x-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 #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 -1 binary64))
(*.f64 (+.f64 (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 x-scale x-scale)) #s(literal 3 binary64)) (pow.f64 (/.f64 (-.f64 #s(literal 0 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 x-scale x-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 #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 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (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 x-scale x-scale)) #s(literal 2 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-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 #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 0 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 x-scale x-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 #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 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-scale)))))))
(*.f64 (-.f64 (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 x-scale x-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (-.f64 #s(literal 0 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 x-scale x-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 #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 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 x-scale x-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 x-scale x-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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))))
(exp.f64 (*.f64 (log.f64 (/.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.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) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-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)))))) #s(literal -1 binary64)))
(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 x-scale x-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 #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 #s(literal -1/2 binary64) (neg.f64 (*.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) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-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 #s(literal 1 binary64) (/.f64 (/.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.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) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-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))))) #s(literal 1 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.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) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-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 #s(literal 0 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 x-scale x-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 #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 0 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 x-scale x-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))))) (neg.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 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 (*.f64 angle (PI.f64)) #s(literal 1/90 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 (*.f64 x-scale x-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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-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 #s(literal -1/2 binary64) (neg.f64 (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-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))))) #s(literal 1 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 0 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)))))) #s(literal 1 binary64)) (*.f64 (/.f64 (*.f64 x-scale x-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 #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 0 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 #s(literal 1 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 x-scale x-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)))))
(pow.f64 (/.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.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) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-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))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.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) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-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))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 0 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 x-scale x-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 #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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-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 #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 0 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 x-scale x-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 #s(literal 1 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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-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 #s(literal 1 binary64) (+.f64 #s(literal -1/2 binary64) (neg.f64 (*.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 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-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 #s(literal -1 binary64) (/.f64 #s(literal 1 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 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-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 #s(literal -1 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 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 #s(literal 0 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 x-scale x-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 #s(literal 1 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)))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 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 x-scale x-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)))))) #s(literal -1 binary64)))
(*.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 x-scale x-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 #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 -1 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-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 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))) #s(literal 3 binary64)))) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (-.f64 (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) #s(literal 1/2 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-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 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 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 (pow.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 0 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))))))) #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 x-scale x-scale)))
(*.f64 #s(literal 1/4 binary64) (*.f64 b (*.f64 (*.f64 x-scale y-scale) (pow.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(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/4 binary64) (*.f64 (*.f64 (*.f64 b (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) x-scale) (sqrt.f64 (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))))
(*.f64 b (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 x-scale y-scale) (pow.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(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/4 binary64) b) (*.f64 (*.f64 x-scale y-scale) (pow.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(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 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (sqrt.f64 (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(literal 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 (*.f64 b (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) x-scale)) (sqrt.f64 (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.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 #s(literal 1/2 binary64) (*.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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.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 b (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) x-scale)))
(*.f64 (*.f64 x-scale (*.f64 #s(literal 1/4 binary64) b)) (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (sqrt.f64 (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(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) (pow.f64 (*.f64 #s(literal 8 binary64) (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(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/4 binary64) b))
(*.f64 (*.f64 (sqrt.f64 (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(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 b (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))) x-scale))
(*.f64 (*.f64 (sqrt.f64 (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.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) b)) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(*.f64 (*.f64 (sqrt.f64 (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.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/4 binary64) b))) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))
(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 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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(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)))
(sqrt.f64 (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))
(/.f64 (hypot.f64 (pow.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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) #s(literal 3/2 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 x-scale x-scale)) #s(literal 3/2 binary64))) (sqrt.f64 (+.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 x-scale x-scale)) #s(literal 2 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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(literal 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 (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 x-scale x-scale)) #s(literal 2 binary64)) (pow.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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #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)))) (sqrt.f64 (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #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 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(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))
(pow.f64 (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 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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(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)) #s(literal 2 binary64))
(pow.f64 (*.f64 (+.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(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 -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))))))) (*.f64 x-scale x-scale)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(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))
(pow.f64 (exp.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 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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(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 (hypot.f64 (pow.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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) #s(literal 3/2 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 x-scale x-scale)) #s(literal 3/2 binary64))) (pow.f64 (/.f64 #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 x-scale x-scale)) #s(literal 2 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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(literal 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/2 binary64)))
(*.f64 (sqrt.f64 (-.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 x-scale x-scale)) #s(literal 2 binary64)) (pow.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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #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)))) (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 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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(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 (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 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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(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)) (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 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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(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 (+.f64 #s(literal 1/2 binary64) (*.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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(literal 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 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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/2 binary64) (*.f64 #s(literal 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 #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))))))) (*.f64 x-scale x-scale)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 (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 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 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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.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 (/.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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #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 (+.f64 #s(literal 1/2 binary64) (*.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 #s(literal 1/2 binary64) (*.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/2 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 #s(literal 1/2 binary64) (*.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 #s(literal 1/2 binary64) (*.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/2 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 #s(literal 1/2 binary64) (*.f64 #s(literal 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 1/2 binary64) (*.f64 #s(literal 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/2 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 #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))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(literal 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 (cos.f64 (*.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 1 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 #s(literal 1/2 binary64) (*.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/2 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 (cos.f64 (*.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 #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))))))) (*.f64 x-scale x-scale)))) (-.f64 #s(literal 1/2 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 #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))))))) (*.f64 x-scale x-scale)))) (-.f64 #s(literal 1/2 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))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.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 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)))))))) #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 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 x-scale x-scale)))) (*.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)))))))) #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 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 (+.f64 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(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 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 #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))))))) (*.f64 x-scale x-scale)))) (-.f64 #s(literal 1/2 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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 #s(literal 1/2 binary64) (*.f64 #s(literal 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 1/2 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 #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))))))) (*.f64 x-scale x-scale)))) (-.f64 #s(literal 1/2 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))))))) #s(literal 1 binary64)) (/.f64 #s(literal 1 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 #s(literal 1/2 binary64) (*.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/2 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) (sin.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 (+.f64 #s(literal 1/2 binary64) (*.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)))) (sin.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 (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)))) 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 #s(literal 1/2 binary64) (*.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/2 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 #s(literal 1/2 binary64) (*.f64 #s(literal 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 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)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.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 x-scale x-scale)) #s(literal 2 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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(literal 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 (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 x-scale x-scale)) #s(literal 3 binary64)) (pow.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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) #s(literal 3 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 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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.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 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.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 2 binary64)) (pow.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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #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 (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 x-scale x-scale)) #s(literal 3 binary64)) (pow.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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) #s(literal 3 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 x-scale x-scale)) #s(literal 2 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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(literal 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 (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 x-scale x-scale)) #s(literal 3 binary64)) (pow.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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) #s(literal 3 binary64))) (+.f64 (pow.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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #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 (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 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 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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))))))))
(/.f64 (-.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 x-scale x-scale)) #s(literal 2 binary64)) (pow.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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #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 (+.f64 #s(literal 1/2 binary64) (*.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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(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 #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))))))) (*.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 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 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #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 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(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 #s(literal 1/2 binary64) (*.f64 #s(literal 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 #s(literal 1/2 binary64) (*.f64 #s(literal 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 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))))))) x-scale) (-.f64 #s(literal 1/2 binary64) (*.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 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale (-.f64 #s(literal 1/2 binary64) (*.f64 #s(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 #s(literal 1/2 binary64) (*.f64 #s(literal 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 x-scale x-scale) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 #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))))))) (*.f64 x-scale 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 #s(literal 1/2 binary64) (*.f64 #s(literal 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 #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))))))) (*.f64 x-scale 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 #s(literal 1/2 binary64) (*.f64 #s(literal 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 #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))))))) (*.f64 x-scale 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))))))) x-scale))) (*.f64 (-.f64 #s(literal 1/2 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 (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 x-scale x-scale)) #s(literal 3 binary64)) (pow.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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) #s(literal 3 binary64)))) (neg.f64 (+.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 x-scale x-scale)) #s(literal 2 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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(literal 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 (neg.f64 (-.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 x-scale x-scale)) #s(literal 2 binary64)) (pow.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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #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)))) (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 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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))))
(/.f64 (-.f64 (pow.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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #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)) (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 x-scale x-scale)) #s(literal 2 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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(literal 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))))
(pow.f64 (/.f64 (+.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 x-scale x-scale)) #s(literal 2 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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(literal 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 (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 x-scale x-scale)) #s(literal 3 binary64)) (pow.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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.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 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.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 2 binary64)) (pow.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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #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 (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 x-scale x-scale)) #s(literal 3 binary64)) (pow.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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))) #s(literal 3 binary64))) (/.f64 #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 x-scale x-scale)) #s(literal 2 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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(literal 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 (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 x-scale x-scale)) #s(literal 2 binary64)) (pow.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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #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 (+.f64 #s(literal 1/2 binary64) (*.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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.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 #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))))))) (*.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 #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 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 #s(literal 1/2 binary64) (*.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/2 binary64) (*.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 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 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 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 -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 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 -2 binary64)) #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 (*.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 #s(literal 1/2 binary64) (*.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)))) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) (sin.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 #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))))))) (*.f64 x-scale x-scale))))) #s(literal -1 binary64))
(*.f64 #s(literal -1/2 binary64) (*.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))))))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(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 #s(literal 1/2 binary64) (*.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 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)))))))) #s(literal -1/2 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 (+.f64 #s(literal 1/2 binary64) (*.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 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 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 (+.f64 #s(literal 1/2 binary64) (*.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/2 binary64) (*.f64 #s(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 binary64) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 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 #s(literal 1/2 binary64) (*.f64 #s(literal 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) (sin.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 (+.f64 #s(literal 1/2 binary64) (*.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)))) (sin.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 #s(literal 1/2 binary64) (*.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 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 a b)
(*.f64 b a)
(*.f64 a (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b))))
(*.f64 a (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a b)) b))
(*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 a b))))
(*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b (*.f64 a b)))
(*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (*.f64 a a))
(*.f64 (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b))) a)
(*.f64 (*.f64 a b) (*.f64 #s(literal 4 binary64) (*.f64 a b)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))) b)
(*.f64 (*.f64 a (*.f64 a #s(literal 4 binary64))) (*.f64 b b))
(*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 b b)))
(*.f64 (*.f64 b (*.f64 a b)) (*.f64 a #s(literal 4 binary64)))
(*.f64 (*.f64 b (*.f64 a #s(literal 4 binary64))) (*.f64 a b))
(*.f64 (*.f64 (*.f64 a a) #s(literal 4 binary64)) (*.f64 b b))
(*.f64 (*.f64 (*.f64 a a) b) (*.f64 #s(literal 4 binary64) b))
(*.f64 (*.f64 (*.f64 a a) (*.f64 b b)) #s(literal 4 binary64))
(*.f64 (*.f64 a (*.f64 b (*.f64 a b))) #s(literal 4 binary64))
(*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))
(*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 a b)))
(*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 b b))
(*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a b)))
(*.f64 (*.f64 b b) (*.f64 a #s(literal 4 binary64)))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) a)
(*.f64 (*.f64 a b) (*.f64 #s(literal 4 binary64) b))
(*.f64 (*.f64 b (*.f64 a b)) #s(literal 4 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 (*.f64 #s(literal 1/2 binary64) (log.f64 (PI.f64))) #s(literal 2 binary64)))
(-.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 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 1/3 binary64))
(pow.f64 (cbrt.f64 (PI.f64)) #s(literal 3 binary64))
(pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) #s(literal 1/6 binary64))
(pow.f64 (E.f64) (log.f64 (PI.f64)))
(pow.f64 (exp.f64 #s(literal 1/3 binary64)) (*.f64 (log.f64 (PI.f64)) #s(literal 3 binary64)))
(*.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 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (cbrt.f64 (PI.f64)))
(*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (log.f64 (exp.f64 (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 (PI.f64)) #s(literal 1/3 binary64)) (pow.f64 (pow.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4/3 binary64)) #s(literal 1/3 binary64)))
(*.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 1/3 binary64)) (cbrt.f64 (pow.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4/3 binary64))))
(*.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64))) (pow.f64 (pow.f64 (PI.f64) #s(literal 7/3 binary64)) #s(literal 1/3 binary64)))
(*.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64))) (cbrt.f64 (pow.f64 (PI.f64) #s(literal 7/3 binary64))))
(*.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1/3 binary64)) (pow.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) #s(literal 1/3 binary64)))
(*.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1/3 binary64)) (cbrt.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64))))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1/3 binary64)) (PI.f64))
(*.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) #s(literal 1/3 binary64)) (pow.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) #s(literal 1/3 binary64)))
(*.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 7/3 binary64)) #s(literal 1/3 binary64)) (cbrt.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64))))
(*.f64 (pow.f64 (pow.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4/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 (pow.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 1/3 binary64)) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64))) #s(literal 3 binary64)))
(*.f64 (pow.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 2/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 (sqrt.f64 (cbrt.f64 (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64))) #s(literal 2 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 (exp.f64 (*.f64 #s(literal 1/3 binary64) (log.f64 (PI.f64)))) (exp.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (log.f64 (PI.f64))))))
(*.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 (pow.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4/3 binary64))) (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 1/3 binary64)))
(*.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 7/3 binary64))) (cbrt.f64 (pow.f64 (PI.f64) #s(literal 2/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 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))) (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))))
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 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 (pow.f64 #s(literal 8 binary64) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 #s(literal 64 binary64) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 #s(literal 8 binary64))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/4 binary64)) (pow.f64 #s(literal 8 binary64) #s(literal 1/4 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 (*.f64 #s(literal 1/2 binary64) (log.f64 (PI.f64))) #s(literal 2 binary64)))
(-.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 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal 1/3 binary64))
(pow.f64 (cbrt.f64 (PI.f64)) #s(literal 3 binary64))
(pow.f64 (sqrt.f64 (PI.f64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) #s(literal 1/6 binary64))
(pow.f64 (E.f64) (log.f64 (PI.f64)))
(pow.f64 (exp.f64 #s(literal 1/3 binary64)) (*.f64 (log.f64 (PI.f64)) #s(literal 3 binary64)))
(*.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 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (cbrt.f64 (PI.f64)))
(*.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64)) (log.f64 (exp.f64 (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 (PI.f64)) #s(literal 1/3 binary64)) (pow.f64 (pow.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4/3 binary64)) #s(literal 1/3 binary64)))
(*.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 1/3 binary64)) (cbrt.f64 (pow.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4/3 binary64))))
(*.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64))) (pow.f64 (pow.f64 (PI.f64) #s(literal 7/3 binary64)) #s(literal 1/3 binary64)))
(*.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64))) (cbrt.f64 (pow.f64 (PI.f64) #s(literal 7/3 binary64))))
(*.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1/3 binary64)) (pow.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64)) #s(literal 1/3 binary64)))
(*.f64 (pow.f64 (sqrt.f64 (PI.f64)) #s(literal 1/3 binary64)) (cbrt.f64 (pow.f64 (PI.f64) #s(literal 5/2 binary64))))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1/3 binary64)) (PI.f64))
(*.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) #s(literal 1/3 binary64)) (pow.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64)) #s(literal 1/3 binary64)))
(*.f64 (pow.f64 (pow.f64 (PI.f64) #s(literal 7/3 binary64)) #s(literal 1/3 binary64)) (cbrt.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64))))
(*.f64 (pow.f64 (pow.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4/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 (pow.f64 (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 1/3 binary64)) #s(literal 3 binary64)) (pow.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64))) #s(literal 3 binary64)))
(*.f64 (pow.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 2/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 (sqrt.f64 (cbrt.f64 (PI.f64))) #s(literal 2 binary64)) (pow.f64 (sqrt.f64 (pow.f64 (PI.f64) #s(literal 2/3 binary64))) #s(literal 2 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 (exp.f64 (*.f64 #s(literal 1/3 binary64) (log.f64 (PI.f64)))) (exp.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/3 binary64) (log.f64 (PI.f64))))))
(*.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 (pow.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 4/3 binary64))) (pow.f64 (cbrt.f64 (PI.f64)) #s(literal 1/3 binary64)))
(*.f64 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 7/3 binary64))) (cbrt.f64 (pow.f64 (PI.f64) #s(literal 2/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 (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 binary64))) (cbrt.f64 (pow.f64 (PI.f64) #s(literal 3/2 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))))
(pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 1 binary64))
(pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(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))
(pow.f64 (sqrt.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 2 binary64))
(*.f64 (sqrt.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) (sqrt.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))
(*.f64 (pow.f64 (sqrt.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 1 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))))
(pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 1 binary64))
(pow.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(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))
(pow.f64 (sqrt.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 2 binary64))
(*.f64 (sqrt.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) (sqrt.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))
(*.f64 (pow.f64 (sqrt.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 1 binary64)))

simplify332.0ms (0.5%)

Algorithm
egg-herbie
Rules
4744×*-lowering-*.f32
4744×*-lowering-*.f64
1546×associate-*r*
1504×+-lowering-+.f64
1504×+-lowering-+.f32
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
04299316
115666956
082496956
Stop Event
iter limit
node limit
Counts
588 → 588
Calls
Call 1
Inputs
(* 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)
(* 4 (* a x-scale))
(* 4 (* a x-scale))
(* 4 (* a x-scale))
(* 4 (* a x-scale))
(* 4 (* a x-scale))
(* 4 (* a x-scale))
(* 4 (* a x-scale))
(* 4 (* a x-scale))
(* 4 (* a x-scale))
(* 4 (* a x-scale))
(* 4 (* a x-scale))
(* 4 (* a x-scale))
(* 4 (* a x-scale))
(* 4 (* a x-scale))
(* 4 (* a x-scale))
(* 4 (* a x-scale))
(* 4 (* a x-scale))
(* 4 (* a x-scale))
(* 4 (* a x-scale))
(* 4 (* a x-scale))
(* 4 (* a x-scale))
(* 4 (* a x-scale))
(* 4 (* a x-scale))
(* 4 (* a x-scale))
(* 4 a)
(* 4 a)
(* 4 a)
(* 4 a)
(* 4 a)
(* 4 a)
(* 4 a)
(* 4 a)
(* 4 a)
(* 4 a)
(* 4 a)
(* 4 a)
(* 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)
(* 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)
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(* x-scale y-scale)
(* x-scale y-scale)
(* x-scale y-scale)
(* x-scale y-scale)
(* x-scale y-scale)
(* x-scale y-scale)
(* x-scale y-scale)
(* x-scale y-scale)
(* x-scale y-scale)
(* x-scale y-scale)
(* x-scale y-scale)
(* x-scale y-scale)
(* x-scale y-scale)
(* x-scale y-scale)
(* x-scale y-scale)
(* x-scale y-scale)
(* x-scale y-scale)
(* x-scale y-scale)
(* x-scale y-scale)
(* x-scale y-scale)
(* x-scale y-scale)
(* x-scale y-scale)
(* x-scale y-scale)
(* x-scale y-scale)
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))
(* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))
(* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))
(* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))
(* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))
(* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))
(* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))
(* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))
(* -1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))
(* -1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))
(* -1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))
(* -1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 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 x-scale 2)))))))
(* angle (+ (* 1/8 (* (* (pow angle 2) (* b (* 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 (* (* b (* 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 (* (* b (* 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 (* (* b (* 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 (* (* (pow angle 2) (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/765275040000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/765275040000000 (/ (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 (* (* b (* 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 (* (* b (* 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 (* (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/765275040000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/765275040000000 (/ (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 (* (* (pow angle 2) (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/347128758144000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* 1/347128758144000000000 (/ (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/765275040000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/765275040000000 (/ (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 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(* angle (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))))
(* angle (+ (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))) (* 1/2 (* (* (pow angle 2) (+ (* -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))))))))))
(* angle (+ (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))) (* (pow angle 2) (+ (* 1/2 (* (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))))) (* 1/2 (* (* (pow angle 2) (- (+ (* -1/765275040000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/765275040000000 (/ (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 (+ (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))) (* (pow angle 2) (+ (* 1/2 (* (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))))) (* (pow angle 2) (+ (* 1/2 (* (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))) (- (+ (* -1/765275040000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/765275040000000 (/ (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/2 (* (* (pow angle 2) (- (+ (* -1/347128758144000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* 1/347128758144000000000 (/ (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/765275040000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/765275040000000 (/ (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))))))))))))))
(sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))
(sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))
(sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))
(sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))
(sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))
(sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))
(sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))
(sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))
(* (/ 1 x-scale) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))
(* (/ 1 x-scale) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))
(* (/ 1 x-scale) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))
(* (/ 1 x-scale) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))
(* (/ 1 x-scale) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))
(* (/ 1 x-scale) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))
(* (/ 1 x-scale) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))
(* (/ 1 x-scale) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))
(* -1 (* (/ 1 x-scale) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))
(* -1 (* (/ 1 x-scale) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))
(* -1 (* (/ 1 x-scale) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))
(* -1 (* (/ 1 x-scale) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))
(* (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/765275040000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/765275040000000 (/ (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/765275040000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/765275040000000 (/ (pow (PI) 6) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/347128758144000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* 1/347128758144000000000 (/ (pow (PI) 8) (pow x-scale 2))))))))))))))
(+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))
(+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))
(+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))
(+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))
(+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))
(+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))
(+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))
(+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))
(/ (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))
(/ (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))
(/ (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))
(/ (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))
(/ (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))
(/ (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))
(/ (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))
(/ (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))
(/ (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))
(/ (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))
(/ (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))
(/ (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))
(/ -1 (pow x-scale 2))
(- (* 1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow x-scale 2))) (/ 1 (pow x-scale 2)))
(- (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow angle 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))) (/ 1 (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))) (* 1/765275040000000 (/ (* (pow angle 2) (pow (PI) 6)) (pow x-scale 2))))))) (/ 1 (pow x-scale 2)))
(* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))
(* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))
(* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))
(* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))
(* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))
(* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))
(* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))
(* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))
(* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))
(* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))
(* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))
(* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))
(* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))
(* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))
(* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))
(* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))
(* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))
(* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))
(* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))
(* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* -1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* -1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* -1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* -1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 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 x-scale 2)))))))
(* angle (+ (* 1/8 (* (* (pow angle 2) (* b (* x-scale (* y-scale (* (sqrt 8) (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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 (* (* b (* 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 (* (* b (* 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 (* (* b (* x-scale (* y-scale (* (sqrt 8) (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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 (* (* (pow angle 2) (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1 (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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 (* (* b (* 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 (* (* b (* x-scale (* y-scale (* (sqrt 8) (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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 (* (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1 (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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 (* (* (pow angle 2) (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1 (+ (* 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/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 (/ (* (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (- (+ (* -1 (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(* angle (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))))
(* angle (+ (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))) (* 1/2 (* (* (pow angle 2) (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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))))))))))
(* angle (+ (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))) (* (pow angle 2) (+ (* 1/2 (* (* (pow angle 2) (- (+ (* -1 (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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/2 (* (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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))))))))))))
(* angle (+ (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))) (* (pow angle 2) (+ (* 1/2 (* (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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/2 (* (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))) (- (+ (* -1 (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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/2 (* (* (pow angle 2) (- (+ (* -1 (+ (* 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/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 (/ (* (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (- (+ (* -1 (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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))))))))))))))
(sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(* -1 (* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* -1 (* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* -1 (* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(* -1 (* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 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/32400 (/ (pow (PI) 2) (pow x-scale 2))) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (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 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (+ (* 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/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 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/ -1 (pow x-scale 2))
(- (* 1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow x-scale 2))) (/ 1 (pow x-scale 2)))
(- (* (pow angle 2) (+ (* -1 (* (pow angle 2) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))) (/ 1 (pow x-scale 2)))
(- (* (pow angle 2) (+ (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (* (pow angle 2) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2)))))) (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))))))) (/ 1 (pow x-scale 2)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(* a b)
(* a b)
(* a b)
(* a b)
(* a b)
(* a b)
(* a b)
(* a b)
(* a b)
(* a b)
(* a b)
(* a b)
(* a b)
(* a b)
(* a b)
(* a b)
(* a b)
(* a b)
(* a b)
(* a b)
(* a b)
(* a b)
(* a b)
(* a b)
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* (pow a 2) (pow b 2)))
(* 4 (* a (pow b 2)))
(* 4 (* a (pow b 2)))
(* 4 (* a (pow b 2)))
(* 4 (* a (pow b 2)))
(* 4 (* a (pow b 2)))
(* 4 (* a (pow b 2)))
(* 4 (* a (pow b 2)))
(* 4 (* a (pow b 2)))
(* 4 (* a (pow b 2)))
(* 4 (* a (pow b 2)))
(* 4 (* a (pow b 2)))
(* 4 (* a (pow b 2)))
(* 4 (* a (pow b 2)))
(* 4 (* a (pow b 2)))
(* 4 (* a (pow b 2)))
(* 4 (* a (pow b 2)))
(* 4 (* a (pow b 2)))
(* 4 (* a (pow b 2)))
(* 4 (* a (pow b 2)))
(* 4 (* a (pow b 2)))
(* 4 (* a (pow b 2)))
(* 4 (* a (pow b 2)))
(* 4 (* a (pow b 2)))
(* 4 (* a (pow b 2)))
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))))
Outputs
(* 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)
(* 4 (* a x-scale))
(*.f64 a (*.f64 #s(literal 4 binary64) x-scale))
(* 4 (* a x-scale))
(*.f64 a (*.f64 #s(literal 4 binary64) x-scale))
(* 4 (* a x-scale))
(*.f64 a (*.f64 #s(literal 4 binary64) x-scale))
(* 4 (* a x-scale))
(*.f64 a (*.f64 #s(literal 4 binary64) x-scale))
(* 4 (* a x-scale))
(*.f64 a (*.f64 #s(literal 4 binary64) x-scale))
(* 4 (* a x-scale))
(*.f64 a (*.f64 #s(literal 4 binary64) x-scale))
(* 4 (* a x-scale))
(*.f64 a (*.f64 #s(literal 4 binary64) x-scale))
(* 4 (* a x-scale))
(*.f64 a (*.f64 #s(literal 4 binary64) x-scale))
(* 4 (* a x-scale))
(*.f64 a (*.f64 #s(literal 4 binary64) x-scale))
(* 4 (* a x-scale))
(*.f64 a (*.f64 #s(literal 4 binary64) x-scale))
(* 4 (* a x-scale))
(*.f64 a (*.f64 #s(literal 4 binary64) x-scale))
(* 4 (* a x-scale))
(*.f64 a (*.f64 #s(literal 4 binary64) x-scale))
(* 4 (* a x-scale))
(*.f64 a (*.f64 #s(literal 4 binary64) x-scale))
(* 4 (* a x-scale))
(*.f64 a (*.f64 #s(literal 4 binary64) x-scale))
(* 4 (* a x-scale))
(*.f64 a (*.f64 #s(literal 4 binary64) x-scale))
(* 4 (* a x-scale))
(*.f64 a (*.f64 #s(literal 4 binary64) x-scale))
(* 4 (* a x-scale))
(*.f64 a (*.f64 #s(literal 4 binary64) x-scale))
(* 4 (* a x-scale))
(*.f64 a (*.f64 #s(literal 4 binary64) x-scale))
(* 4 (* a x-scale))
(*.f64 a (*.f64 #s(literal 4 binary64) x-scale))
(* 4 (* a x-scale))
(*.f64 a (*.f64 #s(literal 4 binary64) x-scale))
(* 4 (* a x-scale))
(*.f64 a (*.f64 #s(literal 4 binary64) x-scale))
(* 4 (* a x-scale))
(*.f64 a (*.f64 #s(literal 4 binary64) x-scale))
(* 4 (* a x-scale))
(*.f64 a (*.f64 #s(literal 4 binary64) x-scale))
(* 4 (* a x-scale))
(*.f64 a (*.f64 #s(literal 4 binary64) x-scale))
(* 4 a)
(*.f64 a #s(literal 4 binary64))
(* 4 a)
(*.f64 a #s(literal 4 binary64))
(* 4 a)
(*.f64 a #s(literal 4 binary64))
(* 4 a)
(*.f64 a #s(literal 4 binary64))
(* 4 a)
(*.f64 a #s(literal 4 binary64))
(* 4 a)
(*.f64 a #s(literal 4 binary64))
(* 4 a)
(*.f64 a #s(literal 4 binary64))
(* 4 a)
(*.f64 a #s(literal 4 binary64))
(* 4 a)
(*.f64 a #s(literal 4 binary64))
(* 4 a)
(*.f64 a #s(literal 4 binary64))
(* 4 a)
(*.f64 a #s(literal 4 binary64))
(* 4 a)
(*.f64 a #s(literal 4 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)
(* 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)
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow a 3) (pow b 2)) (* x-scale (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a a))) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(* x-scale y-scale)
(*.f64 x-scale y-scale)
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(*.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 y-scale (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(*.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 y-scale (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(*.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 y-scale (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(*.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 y-scale (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(*.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 y-scale (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(*.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 y-scale (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(*.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 y-scale (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(*.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 y-scale (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(*.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 y-scale (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(*.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 y-scale (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(*.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 y-scale (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(*.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 y-scale (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* -1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 #s(literal -1/4 binary64) b) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* -1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 #s(literal -1/4 binary64) b) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* -1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 #s(literal -1/4 binary64) b) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* -1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 #s(literal -1/4 binary64) b) (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64)))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(*.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 y-scale (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(*.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 y-scale (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(*.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 y-scale (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(*.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 y-scale (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(*.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 y-scale (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(*.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 y-scale (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(*.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 y-scale (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(*.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 y-scale (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(*.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 y-scale (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(*.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 y-scale (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(*.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 y-scale (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(*.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 y-scale (*.f64 x-scale (sqrt.f64 #s(literal 8 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 x-scale 2)))))))
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 angle (sqrt.f64 #s(literal 0 binary64)))))
(* angle (+ (* 1/8 (* (* (pow angle 2) (* b (* 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 (* (* b (* 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 (*.f64 (*.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 angle angle) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(literal 0 binary64))))))))
(* 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 x-scale 2))))))) (* (pow angle 2) (+ (* 1/8 (* (* b (* 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 (* (* (pow angle 2) (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/765275040000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/765275040000000 (/ (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 (*.f64 (*.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 angle angle) #s(literal 1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(literal 0 binary64))) (+.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64))))) (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 y-scale (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)))) (*.f64 x-scale b))))))))
(* 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 x-scale 2))))))) (* (pow angle 2) (+ (* 1/8 (* (* b (* 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 (* (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/765275040000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/765275040000000 (/ (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 (* (* (pow angle 2) (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1/347128758144000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* 1/347128758144000000000 (/ (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/765275040000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/765275040000000 (/ (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 (*.f64 (*.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64))) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(literal 0 binary64))) (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 y-scale (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)))) (*.f64 x-scale b)) (*.f64 (*.f64 x-scale b) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (/.f64 (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64))) (*.f64 angle angle))))) (*.f64 angle angle))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(literal 0 binary64)))))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(*.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 y-scale (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(*.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 y-scale (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(*.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 y-scale (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(*.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 y-scale (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(*.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 y-scale (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(*.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 y-scale (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(*.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 y-scale (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))))
(*.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 y-scale (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))))
(* angle (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))))
(*.f64 angle (sqrt.f64 #s(literal 0 binary64)))
(* angle (+ (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))) (* 1/2 (* (* (pow angle 2) (+ (* -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))))))))))
(*.f64 angle (+.f64 (sqrt.f64 #s(literal 0 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(literal 0 binary64))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64)))))
(* angle (+ (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))) (* (pow angle 2) (+ (* 1/2 (* (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))))) (* 1/2 (* (* (pow angle 2) (- (+ (* -1/765275040000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/765275040000000 (/ (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 (sqrt.f64 #s(literal 0 binary64)) (*.f64 (*.f64 angle angle) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(literal 0 binary64))) (+.f64 #s(literal 0 binary64) (*.f64 angle (*.f64 angle (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)))))))))
(* angle (+ (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))) (* (pow angle 2) (+ (* 1/2 (* (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))) (+ (* -1/3149280000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/3149280000 (/ (pow (PI) 4) (pow x-scale 2)))))) (* (pow angle 2) (+ (* 1/2 (* (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))) (- (+ (* -1/765275040000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/765275040000000 (/ (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/2 (* (* (pow angle 2) (- (+ (* -1/347128758144000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* 1/347128758144000000000 (/ (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/765275040000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/765275040000000 (/ (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 (sqrt.f64 #s(literal 0 binary64)) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(literal 0 binary64))) #s(literal 0 binary64)) (*.f64 (*.f64 angle angle) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(literal 0 binary64))) (+.f64 (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (*.f64 angle (*.f64 angle (/.f64 (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64)))))))))))
(sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))
(sqrt.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale))))
(sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))
(sqrt.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale))))
(sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))
(sqrt.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale))))
(sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))
(sqrt.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale))))
(sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))
(sqrt.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale))))
(sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))
(sqrt.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale))))
(sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))
(sqrt.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale))))
(sqrt (+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2))))))
(sqrt.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale))))
(* (/ 1 x-scale) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))
(/.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))))) x-scale)
(* (/ 1 x-scale) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))
(/.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))))) x-scale)
(* (/ 1 x-scale) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))
(/.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))))) x-scale)
(* (/ 1 x-scale) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))
(/.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))))) x-scale)
(* (/ 1 x-scale) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))
(/.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))))) x-scale)
(* (/ 1 x-scale) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))
(/.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))))) x-scale)
(* (/ 1 x-scale) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))
(/.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))))) x-scale)
(* (/ 1 x-scale) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI)))))))))
(/.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))))) x-scale)
(* -1 (* (/ 1 x-scale) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))
(/.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))))) (neg.f64 x-scale))
(* -1 (* (/ 1 x-scale) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))
(/.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))))) (neg.f64 x-scale))
(* -1 (* (/ 1 x-scale) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))
(/.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))))) (neg.f64 x-scale))
(* -1 (* (/ 1 x-scale) (sqrt (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))))))
(/.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))))) (neg.f64 x-scale))
(* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))
(*.f64 (*.f64 angle angle) #s(literal 0 binary64))
(* (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 (*.f64 (*.f64 angle angle) #s(literal 0 binary64)) #s(literal 0 binary64)))
(* (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/765275040000000 (/ (pow (PI) 6) (pow x-scale 2))) (* 1/765275040000000 (/ (pow (PI) 6) (pow x-scale 2)))))))))))
(*.f64 (*.f64 angle angle) (+.f64 (*.f64 (*.f64 angle angle) (+.f64 (*.f64 (*.f64 angle angle) #s(literal 0 binary64)) #s(literal 0 binary64))) #s(literal 0 binary64)))
(* (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/765275040000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* 1/765275040000000 (/ (pow (PI) 6) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/347128758144000000000 (/ (pow (PI) 8) (pow x-scale 2))) (* 1/347128758144000000000 (/ (pow (PI) 8) (pow x-scale 2))))))))))))))
(*.f64 (*.f64 angle angle) (+.f64 (*.f64 (*.f64 angle angle) (+.f64 (*.f64 (*.f64 angle angle) (+.f64 (*.f64 (*.f64 angle angle) #s(literal 0 binary64)) #s(literal 0 binary64))) #s(literal 0 binary64))) #s(literal 0 binary64)))
(+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))
(-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale)))
(+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))
(-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale)))
(+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))
(-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale)))
(+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))
(-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale)))
(+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))
(-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale)))
(+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))
(-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale)))
(+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))
(-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale)))
(+ (* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2))) (+ (* 1/2 (/ 1 (pow x-scale 2))) (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) (pow x-scale 2)))))
(-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale)))
(/ (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64)))) (*.f64 x-scale x-scale))
(/ (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64)))) (*.f64 x-scale x-scale))
(/ (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64)))) (*.f64 x-scale x-scale))
(/ (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64)))) (*.f64 x-scale x-scale))
(/ (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64)))) (*.f64 x-scale x-scale))
(/ (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64)))) (*.f64 x-scale x-scale))
(/ (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64)))) (*.f64 x-scale x-scale))
(/ (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64)))) (*.f64 x-scale x-scale))
(/ (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64)))) (*.f64 x-scale x-scale))
(/ (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64)))) (*.f64 x-scale x-scale))
(/ (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64)))) (*.f64 x-scale x-scale))
(/ (+ 1/2 (+ (* -1 (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (+.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64)))) (*.f64 x-scale x-scale))
(/ -1 (pow x-scale 2))
(/.f64 #s(literal -1 binary64) (*.f64 x-scale x-scale))
(- (* 1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow x-scale 2))) (/ 1 (pow x-scale 2)))
(+.f64 (/.f64 #s(literal -1 binary64) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/32400 binary64)) (*.f64 angle angle)) (*.f64 x-scale x-scale)))
(- (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow angle 2) (pow (PI) 4)) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))) (/ 1 (pow x-scale 2)))
(+.f64 (*.f64 (*.f64 angle angle) (+.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/32400 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 angle angle)) (*.f64 x-scale x-scale)))) (/.f64 #s(literal -1 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))) (* 1/765275040000000 (/ (* (pow angle 2) (pow (PI) 6)) (pow x-scale 2))))))) (/ 1 (pow x-scale 2)))
(+.f64 (*.f64 (*.f64 angle angle) (+.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/32400 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (+.f64 (/.f64 (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 angle angle) (*.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 x-scale x-scale)))
(* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))
(/.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale))
(* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))
(/.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale))
(* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))
(/.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale))
(* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))
(/.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale))
(* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))
(/.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale))
(* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))
(/.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale))
(* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))
(/.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale))
(* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))
(/.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale))
(* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))
(/.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale))
(* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))
(/.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale))
(* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))
(/.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale))
(* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))
(/.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale))
(* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))
(/.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale))
(* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))
(/.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale))
(* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))
(/.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale))
(* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))
(/.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale))
(* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))
(/.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale))
(* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))
(/.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale))
(* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))
(/.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale))
(* -1 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (pow x-scale 2)))
(/.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64)))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64)))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64)))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64)))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64)))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64)))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64)))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64)))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64)))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64)))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64)))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64)))
(* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64)))
(* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64)))
(* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64)))
(* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64)))
(* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64)))
(* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64)))
(* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64)))
(* 1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64)))
(* -1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal -1/4 binary64)))
(* -1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal -1/4 binary64)))
(* -1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal -1/4 binary64)))
(* -1/4 (* (* b (* y-scale (sqrt 8))) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal -1/4 binary64)))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64)))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64)))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64)))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64)))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64)))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64)))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64)))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64)))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64)))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64)))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64)))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/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 x-scale 2)))))))
(*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 angle (sqrt.f64 #s(literal 0 binary64)))))
(* angle (+ (* 1/8 (* (* (pow angle 2) (* b (* x-scale (* y-scale (* (sqrt 8) (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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 (* (* b (* 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 (*.f64 (*.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 angle angle) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(literal 0 binary64))))))))
(* 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 x-scale 2))))))) (* (pow angle 2) (+ (* 1/8 (* (* b (* x-scale (* y-scale (* (sqrt 8) (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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 (* (* (pow angle 2) (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1 (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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 (*.f64 (*.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64))) (*.f64 (*.f64 (*.f64 angle angle) #s(literal 1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(literal 0 binary64))) (+.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64))))) (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 y-scale (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)))) (*.f64 x-scale b))))))))
(* 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 x-scale 2))))))) (* (pow angle 2) (+ (* 1/8 (* (* b (* x-scale (* y-scale (* (sqrt 8) (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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 (* (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1 (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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 (* (* (pow angle 2) (* b (* x-scale (* y-scale (* (sqrt 8) (- (+ (* -1 (+ (* 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/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 (/ (* (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (- (+ (* -1 (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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 (*.f64 (*.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64))) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(literal 0 binary64))) (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 8 binary64)) (*.f64 y-scale (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)))) (*.f64 x-scale b)) (*.f64 (*.f64 x-scale b) (*.f64 (*.f64 (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))) (/.f64 (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64))) (*.f64 angle angle))))) (*.f64 angle angle))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 b (*.f64 x-scale (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) #s(literal 0 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(literal 0 binary64)))))))))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64)))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64)))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64)))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64)))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64)))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64)))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64)))
(* 1/4 (* (* b (* x-scale (* y-scale (sqrt 8)))) (sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))))
(*.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64)))
(* angle (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))))
(*.f64 angle (sqrt.f64 #s(literal 0 binary64)))
(* angle (+ (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))) (* 1/2 (* (* (pow angle 2) (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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))))))))))
(*.f64 angle (+.f64 (sqrt.f64 #s(literal 0 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(literal 0 binary64))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64)))))
(* angle (+ (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))) (* (pow angle 2) (+ (* 1/2 (* (* (pow angle 2) (- (+ (* -1 (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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/2 (* (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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))))))))))))
(*.f64 angle (+.f64 (sqrt.f64 #s(literal 0 binary64)) (*.f64 (*.f64 angle angle) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(literal 0 binary64))) (+.f64 #s(literal 0 binary64) (*.f64 angle (*.f64 angle (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)))))))))
(* angle (+ (sqrt (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))) (* (pow angle 2) (+ (* 1/2 (* (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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/2 (* (sqrt (/ 1 (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))) (- (+ (* -1 (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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/2 (* (* (pow angle 2) (- (+ (* -1 (+ (* 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/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 (/ (* (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (- (+ (* -1 (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (* 1/4 (/ (pow (+ (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (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 (sqrt.f64 #s(literal 0 binary64)) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(literal 0 binary64))) #s(literal 0 binary64)) (*.f64 (*.f64 angle angle) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(literal 0 binary64))) (+.f64 (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (*.f64 angle (*.f64 angle (/.f64 (/.f64 #s(literal 0 binary64) #s(literal 0 binary64)) #s(literal 0 binary64)))))))))))
(sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(sqrt.f64 #s(literal 0 binary64))
(sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(sqrt.f64 #s(literal 0 binary64))
(sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(sqrt.f64 #s(literal 0 binary64))
(sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(sqrt.f64 #s(literal 0 binary64))
(sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(sqrt.f64 #s(literal 0 binary64))
(sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(sqrt.f64 #s(literal 0 binary64))
(sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(sqrt.f64 #s(literal 0 binary64))
(sqrt (+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))))
(sqrt.f64 #s(literal 0 binary64))
(* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(/.f64 (sqrt.f64 #s(literal 0 binary64)) x-scale)
(* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(/.f64 (sqrt.f64 #s(literal 0 binary64)) x-scale)
(* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(/.f64 (sqrt.f64 #s(literal 0 binary64)) x-scale)
(* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(/.f64 (sqrt.f64 #s(literal 0 binary64)) x-scale)
(* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(/.f64 (sqrt.f64 #s(literal 0 binary64)) x-scale)
(* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(/.f64 (sqrt.f64 #s(literal 0 binary64)) x-scale)
(* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(/.f64 (sqrt.f64 #s(literal 0 binary64)) x-scale)
(* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2))))
(/.f64 (sqrt.f64 #s(literal 0 binary64)) x-scale)
(* -1 (* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(/.f64 (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 0 binary64))) x-scale)
(* -1 (* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(/.f64 (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 0 binary64))) x-scale)
(* -1 (* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(/.f64 (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 0 binary64))) x-scale)
(* -1 (* (/ 1 x-scale) (sqrt (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)))))
(/.f64 (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 0 binary64))) x-scale)
(* (pow angle 2) (+ (* -1/32400 (/ (pow (PI) 2) (pow x-scale 2))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2)))))
(*.f64 (*.f64 angle angle) #s(literal 0 binary64))
(* (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 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))))))))
(*.f64 (*.f64 angle angle) (+.f64 (*.f64 (*.f64 angle angle) #s(literal 0 binary64)) #s(literal 0 binary64)))
(* (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 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2)))))))))))))
(*.f64 (*.f64 angle angle) (+.f64 (*.f64 (*.f64 angle angle) (+.f64 (*.f64 (*.f64 angle angle) #s(literal 0 binary64)) #s(literal 0 binary64))) #s(literal 0 binary64)))
(* (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 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (+ (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))))) (+ (* -1/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (+ (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2))) (* (pow angle 2) (+ (* -1 (+ (* 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/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))))))))))))))))))
(*.f64 (*.f64 angle angle) (+.f64 (*.f64 (*.f64 angle angle) (+.f64 (*.f64 (*.f64 angle angle) (+.f64 (*.f64 (*.f64 angle angle) #s(literal 0 binary64)) #s(literal 0 binary64))) #s(literal 0 binary64))) #s(literal 0 binary64)))
(+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
#s(literal 0 binary64)
(+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
#s(literal 0 binary64)
(+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
#s(literal 0 binary64)
(+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
#s(literal 0 binary64)
(+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
#s(literal 0 binary64)
(+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
#s(literal 0 binary64)
(+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
#s(literal 0 binary64)
(+ (* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2))) (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
#s(literal 0 binary64)
(/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
#s(literal 0 binary64)
(/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
#s(literal 0 binary64)
(/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
#s(literal 0 binary64)
(/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
#s(literal 0 binary64)
(/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
#s(literal 0 binary64)
(/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
#s(literal 0 binary64)
(/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
#s(literal 0 binary64)
(/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
#s(literal 0 binary64)
(/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
#s(literal 0 binary64)
(/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
#s(literal 0 binary64)
(/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
#s(literal 0 binary64)
(/ (+ (* -1 (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
#s(literal 0 binary64)
(/ -1 (pow x-scale 2))
(/.f64 #s(literal -1 binary64) (*.f64 x-scale x-scale))
(- (* 1/32400 (/ (* (pow angle 2) (pow (PI) 2)) (pow x-scale 2))) (/ 1 (pow x-scale 2)))
(+.f64 (/.f64 #s(literal -1 binary64) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/32400 binary64)) (*.f64 angle angle)) (*.f64 x-scale x-scale)))
(- (* (pow angle 2) (+ (* -1 (* (pow angle 2) (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2)))))) (* 1/32400 (/ (pow (PI) 2) (pow x-scale 2))))) (/ 1 (pow x-scale 2)))
(+.f64 (*.f64 (*.f64 angle angle) (+.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/32400 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 angle angle)) (*.f64 x-scale x-scale)))) (/.f64 #s(literal -1 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/816293376000000 (/ (pow (PI) 6) (pow x-scale 2))) (* -1/12244400640000000 (/ (pow (PI) 6) (pow x-scale 2)))))) (* -1 (+ (* 1/12597120000 (/ (pow (PI) 4) (pow x-scale 2))) (* 1/4199040000 (/ (pow (PI) 4) (pow x-scale 2))))))))) (/ 1 (pow x-scale 2)))
(+.f64 (*.f64 (*.f64 angle angle) (+.f64 (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/32400 binary64)) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (+.f64 (/.f64 (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 angle angle) (*.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 x-scale x-scale)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))
(* -1 (/ (pow (cos (* 1/180 (* angle (PI)))) 2) (pow x-scale 2)))
(/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64)) (neg.f64 (*.f64 x-scale x-scale)))
(* a b)
(*.f64 a b)
(* a b)
(*.f64 a b)
(* a b)
(*.f64 a b)
(* a b)
(*.f64 a b)
(* a b)
(*.f64 a b)
(* a b)
(*.f64 a b)
(* a b)
(*.f64 a b)
(* a b)
(*.f64 a b)
(* a b)
(*.f64 a b)
(* a b)
(*.f64 a b)
(* a b)
(*.f64 a b)
(* a b)
(*.f64 a b)
(* a b)
(*.f64 a b)
(* a b)
(*.f64 a b)
(* a b)
(*.f64 a b)
(* a b)
(*.f64 a b)
(* a b)
(*.f64 a b)
(* a b)
(*.f64 a b)
(* a b)
(*.f64 a b)
(* a b)
(*.f64 a b)
(* a b)
(*.f64 a b)
(* a b)
(*.f64 a b)
(* a b)
(*.f64 a b)
(* a b)
(*.f64 a b)
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b b) (*.f64 #s(literal 4 binary64) (*.f64 a a)))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b b) (*.f64 #s(literal 4 binary64) (*.f64 a a)))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b b) (*.f64 #s(literal 4 binary64) (*.f64 a a)))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b b) (*.f64 #s(literal 4 binary64) (*.f64 a a)))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b b) (*.f64 #s(literal 4 binary64) (*.f64 a a)))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b b) (*.f64 #s(literal 4 binary64) (*.f64 a a)))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b b) (*.f64 #s(literal 4 binary64) (*.f64 a a)))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b b) (*.f64 #s(literal 4 binary64) (*.f64 a a)))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b b) (*.f64 #s(literal 4 binary64) (*.f64 a a)))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b b) (*.f64 #s(literal 4 binary64) (*.f64 a a)))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b b) (*.f64 #s(literal 4 binary64) (*.f64 a a)))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b b) (*.f64 #s(literal 4 binary64) (*.f64 a a)))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b b) (*.f64 #s(literal 4 binary64) (*.f64 a a)))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b b) (*.f64 #s(literal 4 binary64) (*.f64 a a)))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b b) (*.f64 #s(literal 4 binary64) (*.f64 a a)))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b b) (*.f64 #s(literal 4 binary64) (*.f64 a a)))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b b) (*.f64 #s(literal 4 binary64) (*.f64 a a)))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b b) (*.f64 #s(literal 4 binary64) (*.f64 a a)))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b b) (*.f64 #s(literal 4 binary64) (*.f64 a a)))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b b) (*.f64 #s(literal 4 binary64) (*.f64 a a)))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b b) (*.f64 #s(literal 4 binary64) (*.f64 a a)))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b b) (*.f64 #s(literal 4 binary64) (*.f64 a a)))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b b) (*.f64 #s(literal 4 binary64) (*.f64 a a)))
(* 4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b b) (*.f64 #s(literal 4 binary64) (*.f64 a a)))
(* 4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))
(* 4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))
(* 4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))
(* 4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))
(* 4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))
(* 4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))
(* 4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))
(* 4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))
(* 4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))
(* 4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))
(* 4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))
(* 4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))
(* 4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))
(* 4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))
(* 4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))
(* 4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))
(* 4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))
(* 4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))
(* 4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))
(* 4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))
(* 4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))
(* 4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))
(* 4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))
(* 4 (* a (pow b 2)))
(*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 b b)))
1
#s(literal 1 binary64)
(+ 1 (* -1/16200 (* (pow angle 2) (pow (PI) 2))))
(+.f64 #s(literal 1 binary64) (*.f64 angle (*.f64 angle (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/16200 binary64)))))
(+ 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 angle (*.f64 angle (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/1574640000 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 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 (*.f64 angle angle) #s(literal -1/382637520000000 binary64))) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/1574640000 binary64)))))))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))
1
#s(literal 1 binary64)
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 angle angle) #s(literal -1/64800 binary64))))
(+ 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 angle angle) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/25194240000 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 angle angle) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/24488801280000000 binary64))) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/25194240000 binary64)))))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))
(cos (* 1/180 (* angle (PI))))
(cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 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)))
(* angle (+ (* -1/34992000 (* (pow angle 2) (pow (PI) 3))) (* 1/180 (PI))))
(*.f64 angle (+.f64 (*.f64 (PI.f64) #s(literal 1/180 binary64)) (*.f64 angle (*.f64 angle (*.f64 #s(literal -1/34992000 binary64) (*.f64 (PI.f64) (*.f64 (PI.f64) (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 (PI.f64) #s(literal 1/180 binary64)) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 #s(literal -1/34992000 binary64) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 1/22674816000000 binary64) (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 #s(literal -1/34992000 binary64) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 (*.f64 angle angle) (+.f64 (*.f64 (*.f64 angle angle) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) #s(literal -1/30855889612800000000 binary64))) (*.f64 #s(literal 1/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))))))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))
(sin (* 1/180 (* angle (PI))))
(sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))

eval249.0ms (0.4%)

Compiler

Compiled 85123 to 6640 computations (92.2% saved)

prune432.0ms (0.7%)

Pruning

61 alts after pruning (55 fresh and 6 done)

PrunedKeptTotal
New1611221633
Fresh163349
Picked235
Done033
Total1629611690
Accuracy
53.9%
Counts
1690 → 61
Alt Table
Click to see full alt table
StatusAccuracyProgram
4.6%
(/.f64 (/.f64 (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (/.f64 (*.f64 x-scale y-scale) a)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))) x-scale)) (/.f64 b (*.f64 x-scale (*.f64 y-scale y-scale))))
5.9%
(/.f64 (/.f64 (/.f64 (/.f64 (*.f64 a (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) y-scale) y-scale) x-scale) (/.f64 (*.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 a b)) b) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
3.3%
(/.f64 (/.f64 (*.f64 (*.f64 a (*.f64 b (*.f64 a (*.f64 a b)))) #s(literal 4 binary64)) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
6.2%
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) (/.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 y-scale (*.f64 x-scale y-scale)))))) y-scale)
4.6%
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) y-scale)) (/.f64 (*.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 a b)) b) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
3.8%
(/.f64 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 a (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) x-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
10.5%
(/.f64 (*.f64 (/.f64 a x-scale) (/.f64 (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) y-scale)
8.3%
(/.f64 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale)) (*.f64 y-scale (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
0.2%
(/.f64 (*.f64 (*.f64 (pow.f64 (*.f64 a b) #s(literal 1/4 binary64)) (pow.f64 (*.f64 a b) #s(literal 1/4 binary64))) (sqrt.f64 (*.f64 (/.f64 (*.f64 b (*.f64 a #s(literal 8 binary64))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 b (*.f64 a (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (-.f64 (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.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 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 x-scale x-scale)) (/.f64 (+.f64 (*.f64 a (*.f64 a (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))) (*.f64 y-scale y-scale))) (*.f64 (-.f64 (*.f64 b b) (*.f64 a a)) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 x-scale y-scale))))))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
3.2%
(/.f64 (*.f64 (*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) a) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))))
4.6%
(/.f64 (*.f64 (exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 x-scale y-scale) a)) #s(literal -1 binary64))) (/.f64 (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) y-scale)) (/.f64 (*.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 a b)) b) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
4.2%
(/.f64 (*.f64 a (/.f64 (*.f64 a (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
9.6%
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 x-scale y-scale) a))
1.1%
(*.f64 (/.f64 (/.f64 (*.f64 a (*.f64 a a)) x-scale) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) (*.f64 y-scale (*.f64 x-scale y-scale)))))
2.1%
(*.f64 (/.f64 (/.f64 (*.f64 a (*.f64 a a)) x-scale) #s(literal 4 binary64)) (/.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (*.f64 (/.f64 b (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a (*.f64 a b)) x-scale))))
4.6%
(*.f64 (/.f64 (*.f64 a (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 b b)) y-scale))))
2.5%
(*.f64 (/.f64 (*.f64 a (*.f64 a a)) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) (*.f64 y-scale (*.f64 x-scale y-scale)))))
1.1%
(*.f64 (/.f64 (*.f64 a (*.f64 a a)) (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) x-scale))) (/.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 y-scale (*.f64 x-scale y-scale))))
2.2%
(*.f64 (/.f64 a (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) x-scale))) (/.f64 (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) (*.f64 y-scale (*.f64 x-scale y-scale))))
6.2%
(*.f64 (*.f64 (/.f64 (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (/.f64 (*.f64 x-scale y-scale) a)) (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale))
1.6%
(*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64))))) y-scale) (*.f64 y-scale (*.f64 x-scale x-scale)))
4.2%
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (pow.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/4 binary64)) #s(literal 2 binary64))))) (sqrt.f64 (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 #s(literal 1 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))
10.4%
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (pow.f64 (pow.f64 #s(literal 8 binary64) #s(literal 1/4 binary64)) #s(literal 2 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 #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 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)))))))
5.0%
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (fma.f64 (/.f64 (-.f64 #s(literal 0 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 x-scale x-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 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 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/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-scale)))))
4.6%
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) x-scale) (/.f64 #s(literal 1 binary64) 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-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 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))))))
12.9%
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (fma.f64 (/.f64 #s(literal -1/2 binary64) (sin.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 (+.f64 #s(literal 1/2 binary64) (*.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)))) (sin.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)))))
5.2%
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (cbrt.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))))) #s(literal 1/90 binary64))))) (/.f64 #s(literal 1 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))
12.5%
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (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 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 (+.f64 #s(literal -1/2 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)))))
4.3%
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (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 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 #s(literal 0 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 #s(literal 1 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 x-scale x-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))))))))
6.9%
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (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 #s(literal 1 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) #s(literal 1 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)))))))))
7.0%
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) #s(literal 1 binary64))) (/.f64 #s(literal 1 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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (/.f64 (*.f64 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))
3.5%
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (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 x-scale x-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 #s(literal -1 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 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))))) (*.f64 x-scale x-scale)))))
4.0%
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (fma.f64 (cos.f64 (*.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 #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))))))) (*.f64 x-scale x-scale)))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))))))))
17.1%
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) 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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
13.8%
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) 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 (*.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 x-scale x-scale) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))) (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))))))
6.8%
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) 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 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 x-scale x-scale) (+.f64 #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 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))))))
11.5%
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) 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/32400 binary64) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))))))
11.6%
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) 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 #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 (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)))))))
13.4%
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) 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 #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 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))) #s(literal 2 binary64)))))))
14.5%
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) 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 #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 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)))))))
11.4%
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 (+.f64 (/.f64 (pow.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (*.f64 x-scale x-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 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)))))))
14.5%
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 x-scale (*.f64 y-scale (exp.f64 (*.f64 (log.f64 #s(literal 8 binary64)) #s(literal 1/2 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 #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 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)))))))
4.1%
(*.f64 (*.f64 (sqrt.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 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 x-scale x-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 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))))) (/.f64 (*.f64 x-scale (*.f64 y-scale (*.f64 x-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))))) (pow.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 x-scale x-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 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))
32.1%
(*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64)))
35.0%
(*.f64 (*.f64 x-scale (*.f64 a #s(literal 4 binary64))) #s(literal 1/4 binary64))
1.9%
(*.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))))))))
0.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 (*.f64 b b) (+.f64 #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 (*.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 (/.f64 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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.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 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.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 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 y-scale y-scale))) #s(literal 2 binary64)))))))
3.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 (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))) #s(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)))))))))))))
2.7%
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.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 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.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 b b) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
1.2%
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 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 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)))))))
3.1%
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (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 #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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 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 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(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 (exp.f64 (*.f64 (log.f64 a) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)))))))))
3.2%
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64)))) (sqrt.f64 (+.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 (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 #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 a a) (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 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 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)))))))))
11.3%
(*.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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))
11.5%
(*.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))
9.9%
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a (*.f64 x-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 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))))))
35.0%
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a x-scale)) #s(literal 4 binary64))
17.0%
(*.f64 (sqrt.f64 (-.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (/.f64 #s(literal 1/2 binary64) (*.f64 x-scale x-scale)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 #s(literal 1/4 binary64) b) (*.f64 y-scale (*.f64 x-scale (sqrt.f64 #s(literal 8 binary64))))))
1.0%
(*.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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))))))))
35.0%
(*.f64 x-scale a)
34.7%
(*.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 12942 to 2838 computations (78.1% saved)

regimes298.0ms (0.4%)

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

8 calls:

49.0ms
(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
43.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))))
32.0ms
b
31.0ms
(/.f64 angle #s(literal 180 binary64))
30.0ms
x-scale
Results
AccuracySegmentsBranch
36.6%2a
45.0%2b
42.6%3angle
36.9%2x-scale
43.8%2y-scale
35.0%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))))
42.6%3(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
42.6%3(/.f64 angle #s(literal 180 binary64))
Compiler

Compiled 236 to 97 computations (58.9% saved)

regimes60.0ms (0.1%)

Counts
37 → 1
Calls
Call 1
Inputs
(*.f64 x-scale a)
(*.f64 (*.f64 a x-scale) #s(literal 1 binary64))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a x-scale)) #s(literal 4 binary64))
(*.f64 (*.f64 a (*.f64 x-scale #s(literal 4 binary64))) #s(literal 1/4 binary64))
(*.f64 (*.f64 x-scale (*.f64 a #s(literal 4 binary64))) #s(literal 1/4 binary64))
(*.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64))))) y-scale) (*.f64 y-scale (*.f64 x-scale x-scale)))
(*.f64 (*.f64 (/.f64 (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (/.f64 (*.f64 x-scale y-scale) a)) (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale))
(*.f64 (/.f64 a (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) x-scale))) (/.f64 (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a (*.f64 a a)) #s(literal 4 binary64)) (/.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 (/.f64 b (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a (*.f64 a b)) x-scale))))
(*.f64 (/.f64 (*.f64 a (*.f64 a a)) (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) x-scale))) (/.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 a (*.f64 a a)) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 (*.f64 a (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 b b)) y-scale))))
(*.f64 (/.f64 (/.f64 (*.f64 a (*.f64 a a)) x-scale) #s(literal 4 binary64)) (/.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (*.f64 (/.f64 b (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a (*.f64 a b)) x-scale))))
(*.f64 (/.f64 (/.f64 (*.f64 a (*.f64 a a)) x-scale) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) (*.f64 y-scale (*.f64 x-scale y-scale))) (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 a (*.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (*.f64 y-scale (*.f64 x-scale y-scale))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 a (/.f64 (*.f64 a (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (*.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) a) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))))
(/.f64 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 a (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))) y-scale)
(/.f64 (*.f64 (/.f64 a x-scale) (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale)) (*.f64 y-scale (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(/.f64 (*.f64 (/.f64 a x-scale) (/.f64 (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) y-scale)
(/.f64 (*.f64 (/.f64 a y-scale) (/.f64 (*.f64 a (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) x-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) y-scale)) (/.f64 (*.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 a b)) b) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 a (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) y-scale)) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal 4 binary64)) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b)))) (*.f64 x-scale y-scale)) (/.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 a (*.f64 b b)) x-scale) (/.f64 a (*.f64 y-scale (*.f64 x-scale y-scale)))))) y-scale)
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) y-scale) (/.f64 (*.f64 a (*.f64 a a)) (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 b (*.f64 a (*.f64 a b))) #s(literal -4 binary64))) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 a b))) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (/.f64 (*.f64 (*.f64 a (*.f64 b (*.f64 a (*.f64 a b)))) #s(literal 4 binary64)) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (/.f64 (/.f64 (*.f64 (*.f64 a a) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b b))) y-scale)) y-scale) x-scale) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 b (*.f64 b a)))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (/.f64 (/.f64 (/.f64 (*.f64 a (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))))) y-scale) y-scale) x-scale) (/.f64 (*.f64 (*.f64 (*.f64 a #s(literal 4 binary64)) (*.f64 a b)) b) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (/.f64 (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (/.f64 (*.f64 x-scale y-scale) a)) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b))) x-scale)) (/.f64 b (*.f64 x-scale (*.f64 y-scale y-scale))))
(neg.f64 (/.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 b (*.f64 a (*.f64 a b))) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 (*.f64 b (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) y-scale) (*.f64 #s(literal 4 binary64) (*.f64 a (*.f64 a b)))) (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 x-scale y-scale) a))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 a (*.f64 (*.f64 b b) #s(literal 4 binary64)))) x-scale) #s(literal 1 binary64)) (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 #s(literal 4 binary64) (*.f64 y-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 b (*.f64 a (*.f64 a b))) x-scale))))
(*.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) (*.f64 x-scale (*.f64 a (sqrt.f64 #s(literal 8 binary64))))) (sqrt.f64 #s(literal 2 binary64)))
Outputs
(*.f64 (*.f64 x-scale (*.f64 a #s(literal 4 binary64))) #s(literal 1/4 binary64))
Calls

5 calls:

12.0ms
angle
11.0ms
a
11.0ms
b
10.0ms
y-scale
10.0ms
x-scale
Results
AccuracySegmentsBranch
35.0%1a
35.0%1x-scale
35.0%1angle
35.0%1y-scale
35.0%1b
Compiler

Compiled 30 to 25 computations (16.7% saved)

regimes14.0ms (0%)

Accuracy

Total -0.2b remaining (-0.5%)

Threshold costs -0.2b (-0.5%)

Counts
4 → 1
Calls
Call 1
Inputs
(*.f64 x-scale a)
(*.f64 (*.f64 a x-scale) #s(literal 1 binary64))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a x-scale)) #s(literal 4 binary64))
(*.f64 (*.f64 a (*.f64 x-scale #s(literal 4 binary64))) #s(literal 1/4 binary64))
Outputs
(*.f64 x-scale a)
Calls

5 calls:

5.0ms
b
2.0ms
x-scale
2.0ms
y-scale
2.0ms
a
2.0ms
angle
Results
AccuracySegmentsBranch
35.0%1angle
35.0%1a
35.0%1x-scale
35.0%1b
35.0%1y-scale
Compiler

Compiled 30 to 25 computations (16.7% saved)

bsearch128.0ms (0.2%)

Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
116.0ms
7.840983904781714e+24
1.0348446979456256e+25
Results
64.0ms22×3valid
27.0ms15×2valid
15.0ms4valid
7.0ms1valid
0.0ms0valid
Compiler

Compiled 286 to 141 computations (50.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 105.0ms
ival-cos: 21.0ms (20% of total)
ival-pow: 20.0ms (19% of total)
ival-sin: 19.0ms (18.1% of total)
ival-mult: 17.0ms (16.2% of total)
ival-div: 9.0ms (8.6% of total)
ival-sqrt: 5.0ms (4.8% of total)
backward-pass: 5.0ms (4.8% of total)
ival-add: 3.0ms (2.9% of total)
ival-sub: 2.0ms (1.9% of total)
ival-pi: 1.0ms (1% of total)
ival-neg: 1.0ms (1% of total)
const: 0.0ms (0% of total)

simplify13.0ms (0%)

Algorithm
egg-herbie
Rules
20×*-commutative_binary64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
02432
13332
Stop Event
saturated
Calls
Call 1
Inputs
(if (<=.f64 b #s(literal 9000000000000000385875968 binary64)) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a x-scale)) #s(literal 4 binary64)))
(*.f64 (*.f64 x-scale (*.f64 a #s(literal 4 binary64))) #s(literal 1/4 binary64))
(*.f64 x-scale a)
Outputs
(if (<=.f64 b #s(literal 9000000000000000385875968 binary64)) (*.f64 (*.f64 y-scale (*.f64 (sqrt.f64 #s(literal 8 binary64)) b)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a x-scale)) #s(literal 4 binary64)))
(if (<=.f64 b #s(literal 9000000000000000385875968 binary64)) (*.f64 (*.f64 y-scale (*.f64 b (sqrt.f64 #s(literal 8 binary64)))) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/4 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 a x-scale)) #s(literal 4 binary64)))
(*.f64 (*.f64 x-scale (*.f64 a #s(literal 4 binary64))) #s(literal 1/4 binary64))
(*.f64 #s(literal 1/4 binary64) (*.f64 x-scale (*.f64 a #s(literal 4 binary64))))
(*.f64 x-scale a)
(*.f64 a x-scale)

soundness3.3s (4.9%)

Rules
9426×*-lowering-*.f32
9426×*-lowering-*.f64
7378×*-lowering-*.f32
7378×*-lowering-*.f64
7220×*-lowering-*.f32
Iterations

Useful iterations: 3 (0.0ms)

IterNodesCost
056183
1134174
2550174
35133171
09422171
0981115
1574902
26200902
08006902
02334162443
17270162251
08115162251
01498148818
15617139965
08122139965
0125818
1812665
08373665
04299316
115666956
082496956
Stop Event
fuel
iter limit
node limit
iter limit
node limit
iter limit
node limit
iter limit
node limit
iter limit
node limit
iter limit
node limit
Compiler

Compiled 211 to 152 computations (28% saved)

preprocess73.0ms (0.1%)

Remove

(abs y-scale)

Compiler

Compiled 1584 to 1042 computations (34.2% saved)

end0.0ms (0%)

Profiling

Loading profile data...